Предмет: Информатика,
автор: irihuhutihteuh
Выведите на экран, все четные числа от 35 до 117 и нечетные чиcла, лежащие в диапазоне от 45 до 99
megadrag:
просто написать четные нечетные цифры?
Ответы
Автор ответа:
3
var i: integer;
beginfor i:=35 to 117 doif (i mod 2=0) then write(i:4);writeln;writeln;for i:=45 to 99 doif (i mod 2<>0) then write(i:4);end.
beginfor i:=35 to 117 doif (i mod 2=0) then write(i:4);writeln;writeln;for i:=45 to 99 doif (i mod 2<>0) then write(i:4);end.
Похожие вопросы
Предмет: История,
автор: sofiaprizvise
Предмет: Химия,
автор: salamar5
Предмет: Геометрия,
автор: adsasa35445
Предмет: Алгебра,
автор: irink1a
Предмет: Математика,
автор: buttika