составить программу в Паскале! пожалуйста!!! СРОЧНО!!! Дано двузначное число. Определить: а) какая из его цифр больше, первая или вторая; б) одинаковы ли его цифры.

Есть ответ
12.12.2022
337

Ответ


var

  c:integer;

begin

  write('Введите число '); readln(c);

  c := abs(c);

  if c div 10 > c mod 10 then

    writeln('Первая цифра больше второй')

  else

    if c div 10 < c mod 10 then

      writeln('Вторая цифра больше первой')

    else

      writeln('Цифры равны');

end.

  

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
12.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.