Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
sadskhoolgirl
25.05.2023 00:54 •
Информатика
Написать программу, которая определяет кратность числа 5, если число кратно 5, тогда приписать к этому числу 8 в конце и выдать на печать полученное число, если не кратно 5, то приписать 1 и выдать на печать
Показать ответ
Ответ:
kburuncenco307
24.09.2020 06:50
Var a:integer;
begin
write('Введите число ');
readln(a);
if a mod 5= 0 then a:=a*10+8
else a:= a*10+1;
writeln(a);
end.
Тестовое решение:
Введите число 125
1258
Введите число 101
1011
0,0
(0 оценок)
Популярные вопросы: Информатика
Erzhan030
19.08.2022 14:39
Исполнитель перемещается вдоль ленты, состоящей из 10 ячеек. Ячейка может быть пустой (0) или содержать метку (1). Система команд исполнителя: «вправо» — переместиться вправ....
sana1998d
18.06.2022 04:07
1. Пусть дан фрагмент программы: int i,j,k,m,n,s=0; for (i=1; i =n; i++) { s=s+i; for (j=1;i =n; j++) { s=s+j;}} for (k=1;k =(2*n);k++) { s=s+C[i][j][k][1];} for (m=1;m =n;m++)...
kataefimova
06.05.2022 06:57
Задание по информатике 9 за класс. Тема задания: матрица.Язык: PythonВот задача:Заполните прямоугольную матрицу a, имеющую n строк и m столбцов элементами из случайных чисел...
Cat09112005
07.12.2022 12:24
Напишите программу осуществляющую вывод элементов массива размером 7×8 где элементы массива произвольные числа...
Nemo24
26.07.2022 12:04
Даны 4 числа, они записаны с использованием различных систем счисления. укажите среди этих чисел то, в двоичной записи которого содержится ровно 6 единиц. если таких чисел несколько,...
mcpoh288
13.01.2020 06:22
Кпамяти компьютера не относится: выберите один из 4 вариантов ответа: 1) флоппи-диск 2) акустические колонки 3) dvd - диск 4) flash - карта...
Милкович11
23.07.2021 19:49
Стр 22 номер 16 информатика 2 часть 3 класс бененсон паутова...
imam002121
11.04.2020 15:01
На сколько градусов остынет вода объёмом 100 л, если в окружающее пространство будет отдано 1680 кдж энергии?...
simonlol98
11.04.2020 15:01
Почему вместо ,тарас бульба и остап начинают драться?...
Dark119277
11.04.2020 15:01
Напишите формулу вещества, если известно , что в его состав входят : а) атом железа и три атома хлора ; б) два атома алюминия и три атома кислорода ; в) атом кальция, атом углерода...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('Введите число ');
readln(a);
if a mod 5= 0 then a:=a*10+8
else a:= a*10+1;
writeln(a);
end.
Тестовое решение:
Введите число 125
1258
Введите число 101
1011