Для целого случайного числа из интервала [-30;20] определите : а) попадает ли оно в интервал [5;20] б) кратно ли оно 3 или 5 . В Паскале
Для целого случайного числа из интервала [-30;20] определите : а) попадает ли оно в интервал [5;20] б) кратно ли оно 3 или 5 . В Паскале
Гость
Ответ(ы) на вопрос:
ГостьVar k : integer;
Begin
Write('Введите цифру от -30 до 20: ');
ReadLn(k);
if ((k <= 20) and (k>= 5)) then WriteLn('Промежутку принадлежит')
else
WriteLn('Промежутку не принадлежит');
End.
Вот и всё! Будут вопросы , пиши.
Не нашли ответ?
Похожие вопросы