Визначте значення всіх змінних у результаті їх виконання.а) x:=0; y:=1;while y<4...

Question

Визначте значення всіх змінних у результаті їх виконання.

а) x:=0; y:=1;

while y<4 do<br>
begin

x:=x+y;

y:=y+1

end;

б) x:=0; i:=1;

repeat

i:=i+1;

x:=x+1/i;

until i>6;

Answer 1

1.
х=4, Y = 6
2.
x=1.592857...
i =7
см приложения в Excel
формулы можно посмотреть Alt+F11

---

Скачать вложение Excel (XLS)