Задание:
Вывести на экран действительные числа в промежутке от n до m с шагом H=2.
Решение:
На паскале-uses crt; var n,m: real; begin write ('Начало промежутка: '); readln (n); write ('Конец промежутка: '); readln (m); write (n,'); while n <= (m-2) do begin n: =n+2; write (n,'); end; end.
Знаете другой ответ?