Ответы
Ответ дал:
0
program pr1;
uses crt;
var
x:integer;
begin
clrscr;
write('Введите число: ');
readln (x);
if x mod 2=0 then
write('YES')
else if x mod 2=1 then
write('NO');
readln;
end.
uses crt;
var
x:integer;
begin
clrscr;
write('Введите число: ');
readln (x);
if x mod 2=0 then
write('YES')
else if x mod 2=1 then
write('NO');
readln;
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад
8 лет назад
8 лет назад