Микрофон - вывод звуковой информации, сканер = ввод текстовой, графической и числовой информации, наушники - вывод звуковой информации, процессор - обработка числовой информации, принтер - вывод текстовой, числовой и графической информации
Написано на Pascal
var a:real;i,k:integer;
begin
writeln('Введите 3 числа');
for i:=1 to 3 do
begin
read(a);
if (a>=2.5) and (a<=5.2) then begin
writeln('Число ',a,' входит в интервал');
k:=k+1;
end;
end;
if k=0 then writeln('Таких чисел нет');
end.<span>
</span>
<u>По подробнее можно?!</u>