Сколько раз выполнится цикл y:=1; i:=1; While i>1 do begin y:=y+1/i; end;

mileva84

26.05.2023

Ноль, потому что i не больше единицы еще до начала работы цикла.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Сколько раз выполнится цикл y:=1; i:=1; While i>1 do begin y:=y+1/i; end;

▲