Вопрос школьника по предмету Информатика
написати програму, що перевіряє, чи належить число ,введене з клавіатури інтервалу[0,5]
Ответ учителя по предмету Информатика
Короткий вариант:
Var A:integer;
Begin
Write(‘Введите число: ‘);ReadLn(A);
WriteLn((0<=A)and(A<=5));
End.
Более полный вариант:
Var
A:integer;
Begin
Write(‘Введите число: ‘);ReadLn(A);
if (0<=A)and(A<=5) then Write(‘Принадлежит’)
else Write(‘Не принадлежит’)
End.
Похожие вопросы от пользователей
1-4 Математика 5+3 б
в саду собрали 444 кг яблок сорта (богатырь) и 348 кг яблок сорта (мелба). Все собранные яблоки разложили по сортам в ящики по 12 кг. Сколько потребовалось ящиков? Решите задачу другим способом при условии что в ящики можно класть яблоки разных сортов