В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
ггггг21
ггггг21
18.09.2022 01:20 •  Информатика

Для целого случайного числа из интервала [-30; 20] определите : а) попадает ли оно в интервал [5; 20] б) кратно ли оно 3 или 5 . в паскале

Ответ:
Zizosia
Zizosia
30.07.2020 01:53
Var k : integer;
Begin   
Write('Введите цифру от -30 до 20: '); 
  ReadLn(k); 
  if ((k <= 20) and (k>= 5)) then    WriteLn('Промежутку принадлежит')   
else 
 WriteLn('Промежутку не принадлежит');
End.

Вот и всё! Будут вопросы , пиши.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?