1. Информатика
  2. Составить программу проверки

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

lerka160 lerka160    2   16.03.2019 02:20    1

Ответы
катя5086 катя5086  25.05.2020 15:14

program test;
var number: integer;

begin
  write('Enter the number: ');
  readln(number);
  if (number mod 2 = 0) then
    writeln('Chislo ', number, ' chetnoe')
  else
    writeln('Chislo ', number, ' nechetnoe');
readln();
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Александраlove1 Александраlove1  15.04.2021 11:06
Какие из записанных ниже операторов ветвления являются правильными? a) if a b then a:= a+1 else b:= b-1; b) if (x 5) and (y 3 ) then s:= s+1; else s:= s-1;c) if a b...
NastyaTeplova NastyaTeplova  15.04.2021 11:06
Решите ...что в третьем столбике...подробно...
shybite shybite  25.11.2021 08:28
Вывести все элементы строки индекс который кратен пяти, [1,2,3, 4,5,6,7,8, 9,10,11,12,13,14,15] PYTHON...
qofepvcqj qofepvcqj  25.11.2021 08:28
a,b,c=map(int,input().split()) if a =b =c: print(a) elif b =a =c: print(b) else: print(c) if a =b =c: print(c) elif a =c =b: print(b) else: print(a)...
Sasha23333000 Sasha23333000  25.11.2021 08:29
Файл Тест Настройка Справка ух Вопрос 4 из 6: Отметьте все правильные адреса ячеек и диапазонов электронной таблицы Выберите несколько из 6 вариантов ответа: BB33 О1...
Anolu Anolu  25.11.2021 08:29
с информатикой , нужно сделать 3 и 8 задние , обратите внимание на то что в 3 есть дополнительное задание где нужно составить ребусы к словам (информация , кодирования,...
noxiksds noxiksds  21.08.2019 14:00
Пользователь работал с каталогом c: \документы\договоры\продажа. сначала он поднялся на один уровень вверх, затем спустился в каталог , затем спустился в каталог покупка....
nizyulkoelena nizyulkoelena  21.08.2019 14:00
100б постройте таблицы истинности для логических выражений: 1. а/\в\/¬а/\в 2. (а\/в)/\(¬а\/в) 3. ¬(а/\в) 4. ¬(а\/в)...
krechetnickova krechetnickova  21.08.2019 14:00
Сделать многоуровневый список семьи...
дэнчик60 дэнчик60  23.08.2019 10:20
Последвукратного повышения зарплатаповысилась на 170%, причем первый раз зарплата повышалась на 80%. на сколько процентов было 2 повышение?...

Популярные вопросы