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

Question

Информатика

Варварка

24 июня, 08:35

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

+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.