Программа пересчета расстояния из миль в километры — Pascal(Паскаль)

program milkm;
var
	Mil:real;	{ расстояние в милях}
	Kilom:real;	{ расстояние в километрах}
	
begin
	writeln('Пересчет расстояния: Мили -> Километры.');
	write('Задайте расстояние в милях: ');
	readln(Mil);
	Kilom:= Mil * 1.6;
	writeln(Mil:5:2,' миль это', Kilom:5:2,' км.');
end.

Leave a Comment

8 + 2 =