Может, второе вот так?
А в решении Аштона лучше так напиши
readln(a, b);
writeln('P = ', 2 * (a + b));
writeln('S = ', a * b);
а то будут дополнительные вопросы к тебе у препода.
Нужно делать хорошее, чтобы люди не возненавидели. Надо говорить хорошими для окружающих делами
Ответ Г
1 км=1024м
1м=64см
1024м=65536см
1км=65536см
65536см=128сек
Найдем скорость, 65536/128=512см/с
100м=10000см
Теперь находим за сколько он пробежит 100 метров:
10000/512=19.5 и округляжем до целого числа получаем 20)
Vara,b,sum:real;beginread(a,b);sum:=0;sum:=abs(a-b);write(sum);end.
Ответ во вложениях, с решением