Предмет: Информатика,
автор: KreyLessy
Составить программу, проверяющую, есть ли в числе четные цифры.
Var: n - число,... Язык: Pascal
Ответы
Автор ответа:
0
if n mod 2=0 then write('Четное')
else write('Не четное');
ovsymiron:
могу полностью написать, если надо
var n: integer;
begin
begin
writeln('Введите число');
readln(a);
if n mod 2=0 then write('Чётное')
else writeln('Нечётное');
end.
readln(a);
if n mod 2=0 then write('Чётное')
else writeln('Нечётное');
end.
Огромное спасибо!)
Похожие вопросы
Предмет: Физика,
автор: okondusov03
Предмет: История,
автор: ulyana200636
Предмет: Русский язык,
автор: Ktt04
Предмет: Физика,
автор: nlyutoslav