Ввести с клавиатуры 2 целых числа: m и n. Если m делится на n или n делится на m, то вывести 1, в противном случае — любое другое число.
Напишите программу в Паскаль.

паскальщик

varm, n: integer;beginreadln(m, n);if (m mod n = 0) or (n mod m = 0) thenwriteln(1)elsebeginrandomize;writeln(random(50));end;end.