Регистрация
shaimyr24
26.01.2021 09:00
Информатика
Есть ответ 👍

Нужно сделать задание в Pascal ABC.!

122
207
Посмотреть ответы 1

Ответы на вопрос:

ukrkaravan757
ukrkaravan757
4,7(48 оценок)
Program abc; var n : integer; begin writeln('введите целое число: '); readln(n); if (n mod 2=0) and (n div 100=0) and (n div 10> 0) then    writeln ('это чётное двухзначное число') else   writeln ('это число не является чётным двухзначным') end.

Популярно: Информатика