Вопрос задан 24.07.2023 в 06:40. Предмет Информатика. Спрашивает Шибеко Каринка.

2 числа вводятся с клавиатуры. проверить их сумма четное число? напишите программу для PascalABC

0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Садыков Алексей.

uses:  garfABC;

var:

  a : integer;

   b: integer;

begin

readln(a);

readln(b);

if Odd(a + b) then

 WriteLn('Нечётное')

else

 WriteLn('Чётное');

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Sure! Below is a PascalABC code to check if the sum of two numbers entered from the keyboard is an even number:

pascal
Program CheckEvenSum; var num1, num2, sum: Integer; begin Write('Enter the first number: '); ReadLn(num1); Write('Enter the second number: '); ReadLn(num2); sum := num1 + num2; if sum mod 2 = 0 then WriteLn('The sum is even.') else WriteLn('The sum is odd.'); end.

When you run this program, it will prompt you to enter two integers. After entering the numbers, it will calculate their sum and determine if it's an even number or not. It will then display the result accordingly.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос