Задать вопрос
1 октября, 02:55

Заданы 2 целых числа. Напечатать, делится ли большее на меньшее нацело

+2
Ответы (1)
  1. 1 октября, 05:43
    0
    Var

    a, b, t: integer;

    begin

    readln (a, b) ;

    if b > a then begin

    t : = a;

    a : = b;

    b : = t;

    end;

    writeln (a mod b = 0) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Заданы 2 целых числа. Напечатать, делится ли большее на меньшее нацело ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Среди следующих высказываний выделить элементарные и составные. В составных высказываниях обозначить элементарные высказывания буквами и записать с помощью логических символов 1) Число 6 является делителем числа 36. 2) Число 225 делится нацело на 5.
Ответы (1)
Заданы три числа a, b, c. Если а < 0, то вычислить и напечатать p, равное квадрату максимального из трех чисел, в противном случае напечатать сообщение
Ответы (1)
Напечатать минимальное число, большее N, которое нацело делится на K, где N и K, вводятся с клавиатуры.
Ответы (1)
1) дана строка S определить и напечатать сколько символов * 2) дана строка S вместо каждого символа * записать символы 0 Напечатать полученную строку 3) дана строка S получить и напечатать строку Т образуемую путем прочтения строки S начиная с ее
Ответы (1)
C + + как записать эту программу? Напишите функцию bool f (int x, int y), которая возвращает true, если x делится нацело на y, или наоборот, y делится нацело на x, иначе возвращает false. Предполагается, что значения параметров больше нуля.
Ответы (1)