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

Question

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

Comments

пожалуйста решите срочно нужно

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.

Comments

спасибо большое

---

а как перевести слово mod

---

mod -операция для выделения из числа дробной части

---

например, 5 mod 4=1

---

а ясно. а слово div?

---

div- соответственно наоборот: для выделения целой части из числа

---

например, 5 div 4=2