Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
никуся1984
04.09.2021 12:24 •
Информатика
Дано число. если оно не делится на 5, то увеличить число в 5 раз, в противном случае уменьшить число в 5 раз.
Показать ответ
Ответ:
AlinaAlinochka2008
30.09.2020 11:15
Program Znanija;
var a:integer;
begin
readln(a);
if a mod 5 = 0 then
writeln(a / 5)
else
writeln(a * 5);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
glebyha22
15.11.2022 16:24
Встолбик все натуральные числа из диапазона от a до b в обратном порядке. входные данные: во входном потоке заданы два целых числа a и b (0 a 100, a b = 100)...
aiperi7
31.12.2022 06:38
8. Разделите основные показатели качества компьютерной системы: Производительность, практичность, энергетичность, кос- мичность, надежность и эффективность систем, сетевая, экономичная....
fggyhuhgyg
19.10.2021 02:38
Привести примеры свойств информации (по 3 на каждого) 1. Объективность информации 2. Необъективность информации 3. Достоверность информации 4. Недостоверность информации 5. Полнота...
5мояоценка
01.11.2022 12:19
Задание 1. Исправьте ошибки в тексте Я включил компьютер, прибавил громкость звука мыши играть в любимую игру, быстро двигая сканером. Получив рекордный результат, я ввёл с колонок...
Aron91
12.10.2021 16:05
ИНФОРМАТИКА перевести в 2 систему счисления следующие числа >...
Дарья22031
06.04.2021 21:14
История развития принтеров назовите устройства, которыми в пользовались люди для записи и печати...
Thorwald
05.02.2023 07:26
Как кодируется числовая, текстовая, графическая и звуковая информация? Почему именно так, а не иначе?...
hodyukmaria
07.10.2022 19:35
Составить алгоритм графическим и словесным...
Validgon
03.10.2021 14:11
Дайте текст не отредактированный нужно!...
mariaa987
22.10.2020 23:17
Сколько компьютеров (хостов) может быть в сети с маской. учтите, что два адреса не используются (адрес подсети и широковещательный адрес). 255.255.252.0...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:integer;
begin
readln(a);
if a mod 5 = 0 then
writeln(a / 5)
else
writeln(a * 5);
end.