Kake 23 октября 2019 в 09:56

17 баллов
Круг стадиона 800 метров, по введенной дистанции определить сколько кругов и дополнительно метров нужно пробежать спортсменам

Var s,k,m:integer;
begin
write(s = );
readln(s);
k:=s div 800;
m:=s mod 800;
writeln(Кругов: ,k, и ещё метров: ,m);
end.

Пример:
s = 5020
Кругов: 6 и ещё метров: 220
Компьютеры и вычисления
Для комментирования необходимо зарегистрироваться на сайте