Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Постоянная
Объяснение:
Вот если не Правильно простите
11000 (2) = 30 (8) = 18 (16) = 24 (10)
100111 (2) = 47 (8) = 27 (16) = 39 (10)
10100011 (2) = 243 (8) = а3 (16) = 163 (10)
101010101010 (2) = 5252 (8) = (16) = 2730 (10)
а)
var
p,d,h: real;
begin
readln(h);
p: =1200*9.8*h;
writeln(p);
end.
б)
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);
Популярные вопросы