Напишите программу для решение . камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо нее автомобилей , округля я значение скорости до целых чисел . необходимо определить минимальную зарегистрированную скорость автомобиля . если скорость хотя бы одного автомобиля была больше 80 км/ч , выведите yes иначе no . программа получает на вход число проехавших автомобилей n(1< =n< =30), затем указываются их скорости . значение скорости не может быть меньше 1 и больше 300 . программа должна сначала вывести минимальную скорость , затем yes или no .
hardrop
2
22.05.2019 06:00
28
Другие вопросы по теме Информатика
Barby228
27.03.2019 21:50
ovveall
27.03.2019 22:00
алипдужм
16.04.2020 07:38
golubtsovanyut
17.11.2020 21:58
villa2003
17.11.2020 21:58
Jenny987
17.11.2020 21:57
nastyagru1
15.02.2023 02:23
777497
15.02.2023 02:49
egorfeklistov
15.05.2020 08:47
Популярные вопросы
- Значение простейших в природе и в жизни человека?...
2 - На чем было написанно послание,которое лапландка передала для финки...
2 - Разложите на множители а^2-9, a^3+8, 1-b^3, x^2+10x+25, 9a^2-6a+1...
3 - Сочинение почему я жду летних каникул? можно десять предложений...
2 - Решить систему уравнений 5(х+у)-7(х-у)=12 4(х+у)+3(х-у)=44...
2 - Напишите превращенияfe➡ feso4 ➡fe(oh)2➡fe➡fecl2...
3 - Линза даёт увеличение в 3 раза. определите оптическую силу линзы,...
3 - 300г 25% раствора поваренной соли упарили до 250 г. определите массовую...
3 - Решить систему уравнения x+2y=8 x²-3y=-5...
1 - Запиши слова с выделенными буквами в первую или вторую группу. докажи...
2
uses crt;
var a:array[1..50] of real;
i,n,k:integer;
begin
clrscr;
write('chislo avto='); read(n);
if (n>=1) and (n<=30) then
begin
writeln('skorosti:');
for i:=1 to n do
begin
readln(a[i]);
if a[i]>300 then write('error');
if (a[i]>80) and (a[i]<=300) then k:=k+1;
end;
if k>0 then write('YES')
else write('NO');
end
else write('error');
end.