Оглавление:
Задача — Проверка делимости одного числа на другое
— программирование на Pascal, Си, Кумир, Basic-256, Python
Вводятся два целых числа. Проверить делится ли первое на второе. Вывести на экран сообщение об этом, а также остаток (если он есть) и частное (в любом случае).
- Если первое число нацело делится на второе, то вывести сообщение об этом.
- Иначе вывести сообщение о том, что первое число не делится на второе, найти остаток от деления и также вывести его.
- В конце программы найти частное от деления чисел и вывести его.
Pascal
var a,b: integer;
begin
readln(a);
readln(b);
if a mod b = 0 then
writeln(a,’ делится на ‘, b)
else begin
writeln(a,’ НЕ делится на ‘, b);
writeln(‘Остаток: ‘, a mod b);
end;
writeln(‘Частное: ‘, a div b);
end. 678
4
678 НЕ делится на 4
Остаток: 2
Частное: 169
680
5
680 делится на 5
Частное: 136
Язык Си
#include <stdio.h>
main() {
int a,b;
scanf(«%d%d»,&a,&b);
if (a%b == 0) printf(«%d делится на %d», a, b);
else {
printf(«%d НЕ делится на %dn», a, b);
printf(«Остаток: %d», a%b);
}
printf(«nЧастное: %dn», a/b);
} 1011
11
1011 НЕ делится на 11
Остаток: 10
Частное: 91
455
5
455 делится на 5
Частное: 91
Python
a = int(input())
b = int(input())
if a%b == 0:
print(«%d делится на %d» % (a,b))
else:
print(«%d не делится на %d» % (a,b))
print(«Остаток: %d» % (a%b))
print(«Частное: %d» % (a//b)) 678
23
678 не делится на 23
Остаток: 11
Частное: 29
678
3
678 делится на 3
Частное: 226
КуМир
алг делимость
нач
цел a,b
ввод a,b
если mod(a,b) = 0 то
вывод a, » делится на «, b, нс
иначе
вывод a, » НЕ делится на «, b, нс
вывод «Остаток: «, mod(a,b), нс
все
вывод «Частное: «, div(a,b)
кон 144 14
144 НЕ делится на 14
Остаток: 4
Частное: 10
234 3
234 делится на 3
Частное: 78
Basic-256
input a
input b
if a%b = 0 then
print a + » делится на » + b
else
print a + » не делится на » + b
print «Остаток: » + (a%b)
endif
print «Частное » + ab 567
10
567 не делится на 10
Остаток: 7
Частное 56
675
3
675 делится на 3
Частное 225