напишите программу для решение задачи . камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо нее автомобилей , округля я
5-9 класс
|
значение скорости до целых чисел . необходимо определить минимальную зарегистрированную скорость автомобиля . если скорость хотя бы одного автомобиля была больше 80 км/ч , ВЫВЕДИТЕ YES ИНАЧЕ NO . программа получает на вход число проехавших автомобилей n(1<=n<=30), затем указываются их скорости . значение скорости не может быть меньше 1 и больше 300 . программа должна сначала вывести минимальную скорость , затем yes или no .
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.
Другие вопросы из категории
время через другое соединение со скоростью 1024 бит в секунду. в ответе укажите одно число -размером файла в кбайт. единицы измерения писать не надо
файл размером 1000 кбайт передается через некоторое соединение в течение 1 минуты . определите размер файла (кбайт), который можно передать через это соединение за 36 секунд. в ответе укажите число -размер файла в кбайт .единицы измерение писать не надо
А,Драйверами
В.Загрузчиками
С.Трансляторами
Д.Интерпретатор
2 Звуки этого инструмента способны донести сигнал на несколько киломатров?(7 букв)
4 Часть схемы, передающей информацию?(5 букв)
9 Название помехоустойчивого кода?(5 букв)
Читайте также
ляя значения скорости до целых чисел. Необходимо определить максимальную зарегистрированную скорость автомобиля. Если скорость хотя бы одного автомобиля была меньше 30 км\ч, выведите YES, иначе выведите NO.
Программа получает на вход число проехавших автомобилей N (1=<N=<30), затем указывает их скорости. Значение скорости не может быть меньше 1 и больше 300.
Программа должна сначала вывести максимальную скорость, затем YES или NO.
Написать на языке Паскаль
Пример работы программы: (смотри во вложениях)
алгоритм для решения задачи: Найти действительные корни квадратного уравнения вида ax^2+bx+c=0.
ОЧЕНЬ НУЖНО!!! Заранее благодарю.
2.Составить блок - схему кипячения чайника.
3.Составить алгоритм сбора яблок в саду.Ваша задача сводится к тому,что необходимо собрать ведро яблок с земли.
4.Составьте алгоритм на формальном языке и блок - схему для решения следущего примера : y=5x+6,если х=3
p=1/2*1/4...1/2N;
Турбо паскаль!!!!
знаю задача не очень то и сложно но я забыл как решать такого типа помогите люди пожалуйста срочно нужно