Информатика, опубликовано 2018-08-22 23:38:25 by Гость
Паскаль. Написать программу при помощи процедуры, которая по известному радиусу возвращает в основную программу значения площади круга и длины окружности. Входящие данные: R (радиус); Выходящие данные: S (площадь), L (длина окружности)
Ответ оставил Гость
Program primer;const Pi=3.14;
procedure SandL(R: integer; var S,L: real);
begin
S:=Pi*Power(R,2); L:=2*R*Pi; end;
var R: integer;
S,L: real;
Begin
readln(R);
SandL(r,s,l);
writeln(Trunc(s), ,Trunc(l));
end.
ABC Pascal
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на