произвольное число х вводится с клавиатуры.определить:является ли это число четным,кратно ли 3,крaтно ли 5
10-11 класс
|
нужно написать программу
var x:integer;
begin
write('введите число х='); readln(x);
if x mod 2 = 0 then writeln('Число четное');
if x mod 3 = 0 then writeln('Число кратно 3');
if x mod 5 = 0 then writeln('Число кратно 5');
end.
Другие вопросы из категории
Заданы два массива. Создать один массив в котором все элементы расположены в порядке возрастания.
Данные вводятся с клавиатуры или из файла input.txt, выводятся на экран или в файл output.txt.
Читайте также
оно четным или отрицательным.(Паскаль)
Или так: Из 16 -ти чисел,сделайте для каждого вывод,является ли оно четным или отрицательным .(Паскаль)
Помогите пожалуйста,оченьььь срочно надо!Буду благодарна за решение ,спасибо!!!!!!!
Х. Определить,является ли оно четным и делится ли это число на 3
только два числа: 1 и P. Определить, является ли введенное с клавиатуры число простым.
2) Дано число n. Верно ли, что это число содержит ровно 3 одинаковых цифры?
Оператор case of и if then else:
Задача 1
Вводятся 3 числа. Можно
ли построить треугольник с такими сторонами? Если построить треугольник можно,
то определить, является ли он
равносторонним, равнобедренным или прямоугольным?