Вопрос задан 30.07.2026 в 18:28. Предмет Информатика. Спрашивает Zankovich Marina.

Напишите программу пересчёта расстояния из километров в вёрсты (1 верста = 1066,8 м).

Для Pascal ABC.

Перейти к ответам

Ответы на вопрос

Отвечает Дуров Саша.

Программа на Pascal ABC:

program Convert;
var km, verst: real;
begin
write('Введите расстояние в километрах: ');
readln(km);
verst := km / 1.0668;
writeln('Расстояние в верстах: ', verst:0:2);
end.

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос