Задача 7 урок 13.1
Primary tabs
Модифицируйте предыдущую задачу так, чтобы в случае, если число удовлетворяет требованиям (целое, положительное), то на экран выводились четные числа.
var a,i: integer; begin readln(a); if a<0 then write('ошибка') else for i:=1 to a do if (i mod 2=0) then write(i,' '); writeln(); end.
- Log in to post comments
- 446 reads