Question

СРООООЧНО. ПОМОГИТЕ ПЛИЗ ПО ИНФОРМАТИКЕ ДАЮ 50 БАЛОВ Дано двузначное число. Определить, является ли сумма его чисел двузначным числом. ПАСКАЛЬ.СОСТАВНОЙ ОПЕРАТОР

Answer 1

Ответ:

var

a:integer;

begin

readln(a);

if a div 10+a mod 10>9 then

writeln ('Da')

else writeln ('Net');

end.

Объяснение:

Answer 2

Конечно, я помогу вам с этой задачей! Вот пример решения данной задачи на языке программирования Паскаль с использованием составного оператора:

pascalCopy code
program CheckSum;
var
  number, sum: integer;
begin
  write('Введите двузначное число: ');
  readln(number);
  
  { Вычисляем сумму цифр числа }
  sum := (number div 10) + (number mod 10);
  
  { Проверяем, является ли сумма двузначным числом }
  if (sum >= 10) and (sum <= 99) then
    writeln('Сумма цифр является двузначным числом.')
  else
    writeln('Сумма цифр не является двузначным числом.');
end.

В этом коде мы сначала считываем двузначное число от пользователя. Затем вычисляем сумму его цифр, используя операторы деления и остатка от деления на 10. Далее, через составной оператор if, мы проверяем, является ли сумма двузначным числом (т.е. находится в диапазоне от 10 до 99) и выводим соответствующее сообщение.

Не забудьте скомпилировать и запустить программу на своей среде программирования Паскаль для проверки результата.