Составьте программу, определяющую, является ли введённое с клавиатуры целое число чётным.
5-9 класс
|
Basic
input A / вводим число с клавиатуры
if A/2 then B = "четное" else B = "нечетное" / если А делится на 2, то чет, иначе нечет.
print A" - "B / печать А - чет или нечет.
end
Pascal
program checker;
var a,c:integer;
begin
writeln('Введите число, четность или нечетность которого следует определить.');
readln(a);
c:=a mod 2;
if c <>0 then begin
writeln('Число ',a,' не является четным');
end;
if c=0 then begin
writeln('Число ',a,' является четным.');
end;
readln;
end.
Другие вопросы из категории
сохранит Ctrl+S, то поможет ...". С точки зрения программного обеспечения, вместо многоточия можно вставить, как наиболие часто используемое, ...
А) F1 Б) F2 B) F3 Г) F4
r19, r20 соединение паралельное. Сопротивления заданы в массиве, напряжение вводится.
,8)передается, 9)принимается, 10)разрушается, 11)делится на части ,12)ищется
Читайте также
Составить программу, определяющую, является ли данное утверждение истинным:Ровно одно из чисел А и В не превышает 100
Пример ввода:
68
Пример вывода:
Да
Помогите пожалуйста)
Пример ввода:
123
Пример вывода:
Число 123 кратно 3
Пример ввода:
1245
Пример вывода:
5- нечетное число