Предмет: Информатика,
автор: romashka5280
Найдите площадь круга. Радиус вводится с клавиатуры. Записать все в паскаль
Ответы
Автор ответа:
2
PROGRAM KRUG;
VAR R,S:REAL;
BEGIN
R:=1;
S:3.14*R*R;
WRITE LN(S)
END.
Так
Поставь спасибо плиз)
Автор ответа:
1
S=pr^2 это твой ответ
и мне)
Похожие вопросы
Предмет: Українська література,
автор: katyazoriy
Предмет: Математика,
автор: samizadehvagif147
Предмет: Алгебра,
автор: ldobrovolskiy09
Предмет: Химия,
автор: LinaHoggard
Предмет: Алгебра,
автор: amitzhangulden
var r,s:real;
begin
Writeln('Введите радиус круга:');
read(r);
s:=3.14*r*r;
Writeln('Площадь круга:',s);
end.
или же так