Home
О нас
Products
Services
Регистрация
Войти
Поиск
Krasnova169
@Krasnova169
August 2022
1
10
Report
Помогите, пожалуйста!
Можно ли здесь составить программу?
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
elenaklon
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
if ReadInteger('Введите натуральное число:') mod 4=0
then Writeln('Число кратно четырем')
else Writeln('Число не кратно четырем')
end.
1 votes
Thanks 1
Krasnova169
Спасибо
×
Report "Помогите, пожалуйста! Можно ли здесь составить программу?..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Внимание! Если программа не работает, обновите версию!
begin
if ReadInteger('Введите натуральное число:') mod 4=0
then Writeln('Число кратно четырем')
else Writeln('Число не кратно четырем')
end.