Ответы
Ответ дал:
3
program fagasg;
var g,h: Real;
i: integer;
begin
g:=3;
h:=3;
For i:=2 to 10 do
begin
g:=g+i+1;
h:=g*h;
end;
Writeln(h);
end.
var g,h: Real;
i: integer;
begin
g:=3;
h:=3;
For i:=2 to 10 do
begin
g:=g+i+1;
h:=g*h;
end;
Writeln(h);
end.
mmmegakilll:
Если не будет работать - отпиши, скину скрин программы, мог случайно удалить кое-что при переносе кода
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
7 лет назад
7 лет назад