Составить программу согласно которой с клавиатуры водятся два числа а компьютер определяет делиться ли первое число на второе

Question

Информатика

Игорка

26 апреля, 20:50

Составить программу согласно которой с клавиатуры водятся два числа а компьютер определяет делиться ли первое число на второе

+4

Ответы (1)

Знаете ответ?

Марьяся · Answer 1

Program zadanie;

Var a, b:integer;

Begin

Writeln ('Введите два целы числа') ;

Readln (a, b) ;

If a mod b = 0 Then Writeln ('Первое число делится на второе:', a div b)

Else Writeln ('Первое число не делится на второе') ;

End.