Напишите программу для паскаля, срочно!
1program Krug;
2var r,s:real;
3begin
4Writeln('Введите радиус круга >>');
5read (r);
6s:=3.14*r*r;
7Writeln('Площадь круга:',s);
8end.
Попробуй!
цифры 1, 2, 3- последовательность
Крч сама знаешь!