Нужно ! написать программу проверяющую, принадлежит ли число введенное с данной клавиатуры промежутку от 0 до 5. (0; 5) (а> 0) and (a< 5) начало: begin writeln('') if ; wriyeln(''); end.

ева211078 ева211078    2   27.05.2019 10:00    4

Ответы
Kirillsveta0103 Kirillsveta0103  24.06.2020 09:45
Program abc
var a:longint;
begin
Writeln('Введите число');
readln(a);
if  a>0 and a<5 then writeln('Podhodit')
else writeln('Ne podhodit');
end.
ПОКАЗАТЬ ОТВЕТЫ
nagornayka69 nagornayka69  24.06.2020 09:45
Program zadanie;
var
a:real;
begin
readln(a);
if (а<0) and (a>5) then Writeln('принадлежит ') else
wriyeln('непринадлежит ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика