Дано целое число а. Проверьте высказывание "Число является нечётным" Допишите фрагмент программы:
begin
var a: integer;
begin
if __________ then writeIn(_________________)
else writeIn(____________);
end.

Ответы

Ответ дал: suproq
0
begin 
var a: integer;
begin
if a mod 2 = 1 then writeIn('Число не является чётным');
else writeIn('Число является чётным');
end.
Ответ дал: svetlana6712
0
Спасибо, поняла. Можешь ещё одно решить?
Ответ дал: suproq
0
Ну окей, давай, только желательно новым вопросом :)
Ответ дал: svetlana6712
0
begin
Ответ дал: svetlana6712
0
Хорошо, сейчас задам.
Ответ дал: suproq
0
Вот правильная программа тут: begin
var a: integer;
begin
if a mod 2 = 1 then writeIn('Высказывание верно');
else writeIn('Высказывание неверно');
end.
Вас заинтересует