Регистрация
bogdansoroka20
08.02.2022 13:23
Информатика
Есть ответ 👍

7. Var
y:real;
i:integer:
………………………
y:=1;
i:=5;
while i> 2 do i:=i-1;
y:=y+i*i;
8. Var
s:real;
i:integer:
………………………
y:=1;
i:=2;
repeat
i:=2*i;
y:=y+i
until i>5;
9. Var
y:real;
i:integer:
………………………
y:=1;
i:=1;
while i>1 do
Begin
y:=y+1/i;
i:=i-1;
end;
10. Var
y:real;
i:integer:
………………………
y:=1;
i:=5;
repeat
i:=2*i;
y:=y+i
until i>5

235
343
Посмотреть ответы 1

Ответы на вопрос:

фскорбин
фскорбин
4,5(46 оценок)

Робототехника

Объяснение:

Если правильно,жду самый лучший ответ))

Популярно: Информатика