Дано натуральное число.Определить является ли оно чётным. Паскаль!!
Ответы на вопрос
Ответил Befri
0
еще прикреплен с паскалевским файлом
var n:integer;
begin
writeln('vvedi chislo');
readln(n);
if n mod 2=0 then writeln ('chetnoe') else writeln ('ne chetnoe');
readln;
end.
var n:integer;
begin
writeln('vvedi chislo');
readln(n);
if n mod 2=0 then writeln ('chetnoe') else writeln ('ne chetnoe');
readln;
end.
Приложения:
Новые вопросы