Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
а)самый большой овал-танцоры
далее-актеры
и самый маленький- певцы
в) 2 элемента.
№1. программа на паскале
program xxx;
var n : integer;
x : array[1..10] of integer;
begin
for n: =1 to 10 do
x[n]: =sqr(n) + 5;
wreteln('последовательность х: ')
write(x[i]);
readln
end.
а)
var
p,d,h: real;
readln(h);
p: =1200*9.8*h;
writeln(p);
б)
m,h,r: real;
readln(r);
m: =1200*3.14*h*r*r;
writeln(m);
end;
в) необходимы дополнительные условия количество сосудов
если принять количество сосудов за k тогда
i,k: integer;
m,h,r,s: real;
readln(k);
s: =0;
for i: =1 to k do
s: =s+m;
writeln(s);
крестьянин должен переправить волка и капусту с собой.а козу надо кинуть
на другой берег.
Популярные вопросы