Информатика, опубликовано 2018-08-22 21:52:55 by Гость
ПОМОГИТЕ! Пожалуйста! Дам 40 баллов! Есть ДОБРЫЕ ЛЮДИ, ЗАРАНЕЕ СПАСИБО :)))Составьте программу, проверяющую, верно ли утверждение, что введенное вами целое число делится без остатка на 3.
Ответ оставил Гость
Var
a:integer;
begin
writeln(Введите число);
readln(a);
if a mod 3 = 0 then
writeln(Число делится без остатка на 3)
else
writeln(Число не делится на 3 без остатка);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на