Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
чем ты думал задавая этот вопрос в
но да, скорее всего не совсем точными.
не понятно
объяснение:
program p;
var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end.
var
i: integer;
s: real;
m: array[1..2,1..6] of real;
begin
s: =0;
for i: =1 to 6 do
readln(m[1,i]);
readln(m[2,i]);
s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;
end;
writeln(s);
end.
Популярные вопросы