• Предмет: Информатика
  • Автор: karchevskiynikita3
  • Вопрос задан 7 лет назад

Срочно
Написать программу. X=8, x:=x*x+i, где i имеет значения от 3 до 9

Ответы

Ответ дал: mradcAR
0

Ответ:

program HelloWorld;

var x, i : Longint;

begin

   Randomize;

   i:= Random(9) + 3;

   x:= 8;

   x:=x*x+i;

   writeln(x)

end.

Ответ дал: kornickevg
0

var

i,x: int64;

begin

x:=6;

for i:=3 to 9 do

x:=x*x+i;

writeln(x)

end.

Похожие вопросы