Паскаль.
Найдите Sкруга и длину окружности. Числа не даны.
Там начало : Program:zadacha333;
Var..
Найдите Sкруга и длину окружности. Числа не даны.
Там начало : Program:zadacha333;
Var..
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var S,R,c: real;
begin
writeln('Введите радиус круга: ');
readln(R);
S:=Pi*sqr(R);
c:=2*Pi*R;
writeln('S = ',S);
writeln('c = ',c);
end.