Сколько раз выполняется цикл
a:= 15; b:= 20
нц пока a < b; a:= a – 1 кц

бесконечно

Объяснение:

если же будет a := a + 1, то 4 раза цикл выполнится

program qwerty; uses crt; var a: real; beginclrscr; writeln('введите количество миль'); readln(a); a: = a*1.6; writeln('кол-во киллометров - ',a: 2: 2); readkey; end.

рождения 30.05.95

300