Немного неказисто. и без стрелочек. а так норм.
1)ввели a,b,c,d :a=2.5;b=1;c=6;d=0.3
2)s:=(2.5+1+6+0.3)/4=9.8/4=2.45
3)вывели S
Program PR1;
uses crt;
var skv,skr:real;
a,r:integer;
Begin
clrscr;
writeln('Введите сторону квадрата');
readln(a);
writeln('Введите радиус круга');
readln(r);
skv:=sqr(a);
skr:=pi*sqr(r);
if skv>skr then writeln('Площадь квадрата >')
else writeln('Площадь круга>');
end.
за 128 секунд вася пробегает 1024м.и это на самом деле 65536см
тогда за одну секунду он пробегает
65536/128=512 см
100 метров=10000см
10000/512=19,5(раз по 512 см в стометровке.)
тогда В реальности вася пробегает 100 метров за 19,5 секунд
дай мне лучшее решение)
Элекронной почтой! Звонок по телефону может отвлечь от важного дела, тк человек очень занятой, а письмо он прочтет и ответит по мере своего свободного времени.