составить программу ввести с клавиатуры 2 целых числа m и n >0 если m делится на n или наоборот, то вывести единицу, иначе любое
5-9 класс
|
другое число
uses crt;
var m,n:longint;
begin
read(m,n);
if (m mod n=0) or (n mod m=0) then writeln(1)
else writeln(2);
end.
Другие вопросы из категории
Какое значение примет переменная S после выполнения программы:
S=2
S=1/S^2
S=S*2-1
S=S*2
PRINT S
для дистанционной передачи различных команд роботу применяются сигналы в 15 бит , причём сигнала в 14 бит недостаточно для передачи всех команд управления. какое наибольшее и какое наименьшее количество команд может получать этот робот? может ли общее количество команд быть равно а)16384 команды, б) 8193, в) 32769, г) 30500???????? И ЕСЛИ МОЖНО ОБЪЯСНИТЕ ПОЖАЛУЙСТА КАК РЕШАЛИ!!!!!!!!!!
Читайте также
равносторонний,равнобедренный или какой либо другой.
Вот ещё одна
Составить программу:Даны а,b,c-целые числа.Если они большн 0-вычислите сумму их квадратов;а если хотя бы одно из них четно-вычислите их сумму и произведение.
Пожалуйста ребят.
<гриб> с числом K. Количество грибов может быть любым целым числом: 1, 3, 34, 127 и т.д. Окончание фразы определяется значением последней цифры.
выводит в одной строчке.