Определите значение переменной X После выполнения следующего фрагмента программы:
x:=1;
for i:=1 to 5 do begin x:=x+2*i;
x:=x+1;
end;
Ответы
Ответ дал:
0
Ответ: 36
Объяснение: вот полноценная программа
var
x,i,n:integer;
begin
x:=1;
i:=0;
for i:=1 to 5 do begin x:=x+2*i;
x:=x+1;
end;
writeln('Ответ = ',x);
readln;
end.
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад