Составить блок-схему и нaписать программу на языке паскаль, которая переводит значение скорости v (вводимого оператором readln) в размерности км/час в размерность м/сек

Program n1;
var v: real;
begin
readln(v);
writeln(v*10/36);
end.

Блок-схема - в прилагаемом файле.
var v1,v2:real;
begin
write('v1 (км/ч) = ');
readln(v1);
v2:=v1*1000/3600;
writeln('v2 = ',v2,' м/сек');
end.

Пример:
v1 (км/ч) = 180
v2 = 50 м/сек