Проверьте, делится ли выбранное число на 5, на 11 или 13
10-11 класс
|
нужно сделать в Pascal ABC
var a:integer;
begin
writeln('Введите число');
readln(a);
if (a mod 5=0) then writeln('Число ',a,' делится на число 5')
else writeln('Число ',a,' не делится на число 5');
if (a mod 11=0) then writeln('Число ',a,' делится на число 11')
else writeln('Число ',a,' не делится на число 11');
if (a mod 13=0) then writeln('Число ',a,' делится на число 13')
else writeln('Число ',a,' не делится на число 13');
end.
Другие вопросы из категории
память.Истинность двух высказываний."Если монитор исправен, то оперативная память исправна". "Если монитор неисправен или оперативная память исправна, то оперативная память неисправна, в видеокарта исправна". Означает, что исправна...
Читайте также
Х. Определить,является ли оно четным и делится ли это число на 3
целое число на 5 или не делится. на языке C++
– остаток от деления двух чисел).
1.Если в комнате темно, тогда включи свет.
2. Если имеется задолженность, учи лекции, иначе отчислят.
3.Проверьте равно ли введенное число некоторому значению, в случае равенства вывести на экран сообщение о равенстве.
Помогите пожалуйста! Срочно нужно...
отступ слева 400 пикселей например , ну так вот , если так получиться ,что у меня монитор меньшего расширения , следовательно картинка показывается не вся , а на другом мониторе расширение больше .
Нужно ли подстраивать блок на другом мониторе ?
P.S. Сформулировал как мог))Задавайте вопросы .