profile
Опубликовано 6 лет назад по предмету Информатика от oxxi05

Дано 2 числа. Проверь если большее число делится на меньшее точно.
Пример: Входные данные: 10 250; Выходные данные: 250 делится точно на 10
На Паскаль нужно решение, пож.

  1. Ответ
    Ответ дан ilka1998
    program aaa;
    var a,b: integer;
    begin
    writeln('Введите два числа:');
    readln(a,b);
    if a>b then
     begin
    if (a mod b) = 0 then
    writeln('число ',a,' точно делится на число ',b)
    else
     writeln('число ',a,' не делится на число ',b,' без остатка');
    end;
    if b>a then 
    begin
    if (b mod a) = 0 then
    writeln('число ',b,' точно делится на число ',a)
    else
     writeln('число ',b,' не делится на число ',a,' без остатка ');
    end;
    end.
Самые новые вопросы