Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Seref
07.03.2021 18:02 •
Информатика
Определить делится ли на 5 введенное число x . если делится, то другому числу y присвоить 100 в противном случае у сделать равным 500 нужна программа на паскаль
Показать ответ
Ответ:
симона71
05.10.2020 00:34
Var x,y: integer;
begin
write('Введите х ');
readln(x);
if (x mod 5 <> 0) then y:=500 else y:=100;
writeln('y=',y);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
As337
13.09.2022 08:02
Какие простые команды входят в ски и грис как они выполняются...
knmnatalip011cc
13.09.2022 08:02
Напишите функцию, которая вычисляет количество цифр числа...
StepanEgorov
13.09.2022 08:02
1. какое максимальное количество цветов может быть закодировано при глубине цвета 5 битов? 2. какая минимальная глубина цвета требуется для кодирования 16 цветов? 3. какой...
Таксман
26.12.2021 02:23
Все 5-буквенные слова, составленные из 5 букв а, к, л, о, ш, записаны в алфавитном порядке.вот начало списка: 1. 2. 3. 4. 5. 4 …… 16.2 какое слово следует за словом шалаш?...
daryatitova1
25.04.2020 17:06
Помгите у меня сор надо за 20 мин сделать ...
пике5
01.12.2020 06:35
Установіть відповідність між формулою речовини та класом, до якого вона належить:...
Matka2002
07.11.2021 21:04
Ребята, подскажите какой это сорт лимона?...
папенко
23.09.2022 16:07
Как работают мышца-сгибатель и мышца-разгибатель Какие самые массивные мышцы К здоровью нашего позвоночника , как и к другим органам , нужно относить ся бережно . Почему...
Xiyneu
13.10.2020 15:04
3. Найти: 1) острые углыABC ; 2) высоту CK, если ВС= 14,7 см.используйте теорему 6...
Яна116727
13.02.2022 16:35
Внимательно рассмотрите иллюстрацию. 1. Какой эпизод комедии изображён на иллюстрации? Какие детали (не менее двух), изображённые на иллюстрации вам определить эпизод? 2.Какому...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('Введите х ');
readln(x);
if (x mod 5 <> 0) then y:=500 else y:=100;
writeln('y=',y);
end.