Пользователь вводит расстояние выраженное в милях нужно перевести это расстояние в км(1 миля=1,6км)

2

Ответы и объяснения

2011-09-24T17:05:35+00:00

program qwerty;
uses crt;
var a:real;
begin
clrscr;
writeln('Введите количество миль');
readln(a);
a:= a*1.6;
writeln('Кол-во киллометров - ',a:2:2);
readkey;
end.

  • ali07
  • главный мозг
2011-09-24T18:45:02+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

Программа на Паскале:

Program xxx;
    Var a, b:real;
Begin
  writeln('Введите количество миль');
  readln(a);
  b:= a*1.6;
  writeln('Кол-во киллометров - ',b)
End.