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

var s,k,m:integer;beginwrite('s = ');readln(s);k:=s div 800;m:=s mod 800;writeln('Кругов: ',k,' и ещё метров: ',m);end.Пример:s = 5020Кругов: 6 и ещё метров: 220