90

Надо составить программу на четных чисел

roman_v 30 августа 2022

Надо составить программу на четных чисел

категория: информатика

51

uses crt; var a: integer; beginClrScr; Write ('a='); Readln (a); if a mod 2=0 then Writeln ('Четное') else Writeln ('Не четное'); Readln; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...