Var
v,t:real;
begin
write('Скорость(км/ч) = ');
readln(v);
write('Время(ч) = ');
readln(t);
writeln;
writeln('Расстояние = ',v*t);
end.
ЯП для блок-схемы не так уж и важен. Я в них не силен, но держите)
Сходство двоичного и троичного кода состоит в том что, и там, и там используются нули и единицы для письма.
В то же время различия в том что не используется цифра 2 для письма.