написать программу на языке паскаля 1) Дано натуральное число. Определить является ли оно чётным 2) дано натуральное число. Определить оканчивается ли оно цифрой 7.

Question

Рита

Информатика

28 августа, 10:50

написать программу на языке паскаля 1) Дано натуральное число. Определить является ли оно чётным 2) дано натуральное число. Определить оканчивается ли оно цифрой 7.

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Виктория Кравцова · Answer 1

1)

var n:integer;

begin

write (n);

if n mod 2=0

then

write ('Четное');

else write ('Нечетное');

end.

2)

var k:integer;

begin

write (k);

if k mod 10=7

then

write ('Да');

else

write ('Нет');