Program qq;
var i, n, c:real;
begin
readln(i);
c:=i;
while n<>100 do
begin
n:=n+1;
write(c, ' ');
c:=c*i;
end;
writeln();
<span>end.</span>
А = 1
Б = А = 1
В = А + Б = 1 + 1 = 2
Д = А = 1
Г = А + Д = 1 + 1 = 2
Е = Б + В + А + Г + Д = 1 + 2 + 1 + 2 + 1 = 7
К = Б = 1
Л = Д = 1
М = К + Е + Л = 1 + 7 + 1 = 9
Н = К + М + Л = 1 + 9 + 1 = 11
П = Н = 11
Р = Н = 11
Т = П + Р = 11 + 11 = 22
Ф = П + Т + Р = 11 + 22 + 11 = 44
Ответ: 44
Габа
1)г
2)а
3)б
4)а
вот такой ответ точно правильно
Пиши, допустим, Описание жёлтой команды: Выполняет алгоритм при нажатии клавиши пробел и передаёт сигнал синей команде которая в свою очередь выполняет команду - сделать 10 шагов
Program room;uses crt;var a, b, h : integer; v, s, l, k : real;begin write('Введите длину, ширину и высоту комнаты : '); readln(a, b, h); l:= 10.5; k:= 0.5; v:= a * b * h; s:= l * k; writeln('Ответ : ',v/s :5:2);end.