Составьте блок-схему Program Primer1;
Var x:integer;
V, M, C:real;
Begin Writeln('Введите расход бензина на 1 километр');
Readln (X);
Writeln ('Введите стоимость литра бензина');
Readln(M);
V:=18.35/X;
C:=V*M;
Writeln ('Стоимость поездки=', C);
End.