Регистрация
munisa333
22.10.2021 18:22
Информатика
Есть ответ 👍

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

205
228
Посмотреть ответы 3

Ответы на вопрос:

дан243
дан243
4,8(91 оценок)
Program p_1;   uses crt; var  n, pr: integer; begin write('введите число: '); readln(n); if n mod 2=0 then writeln('число четное') else writeln('число нечетное'); readln; end.
fish1704
fish1704
4,5(67 оценок)
Program cht; //название программы var a: integer; //описание переменных begin //начало программы     writeln ('введите число'); //диалог с пользователем     readln (a); //считывание числа     if a mod 2 = 0 then //проверка на чётность writeln ('это число чётное') //вывод, если чётное     else //иначе     writeln ('число нечётно'); //вывод на нечётное end. //конец программы
cergei201088
cergei201088
4,5(12 оценок)

program AD;

var

   a,b: integer;

begin

 write('введите 1-е число: '); readln(a);

 write('введите 2-у число: '); readln(b);

 writeln('сумма ',a,' и ',b,' = ',a+b);

 writeln('разность ',a,' и ',b,' = ',a-b);

 writeln('произведение ',a,' и ',b,' = ',a*b);

 writeln('частное ',a,' и ',b,' = ',(a/b):5:2);

 readln;

end.

Паскаль

Объяснение:

Популярно: Информатика