program max_elementarray ;
var i, max : integer ;
a : array [1..10] of integer;
begin
for i : = 1 to 10 do
begin
readln(a[i]);
end;
max : = a[1];
for i : = 2 to 10 do
if a[i]> max then max : = a[i];
writeln('max element of array = ',max) ;
readln ;
end.
Поделитесь своими знаниями, ответьте на вопрос:
Разработка ветвящихся алгоритмов в Scilab Цель работы: 1. Научиться использовать в программе условный оператор. 2. Закрепить навыки работы с переменными простых типов. Краткие теоретические сведения Алгоритм ветвящейся структуры – это алгоритм, в котором выбирается один из нескольких возможных путей (вариантов) вычислительного процесса. Для программирования разветвляющихся алгоритмов в ЯП Pascal можно использовать три оператора: 1. условный оператор (оператор условного перехода); 2. оператор выбора (оператор варианта); 3. оператор безусловного перехода. Условный оператор (оператор условного перехода) Условный оператор позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие. Да Нет Формат условного оператора: IF ELSE ; где IF, ELSE - зарезервированные слова («если», «иначе») - выражение логического типа , - операторы
костер - передача информации (сигнала опасности) через дым от костра,
марка - приклеивалась на конверт, передача бумажным письмом,
сумка с письмами - тоже бумажные письма, сумки носили почтальоны,
радио - передача радиоволнами звуком одинаковой информации для всех,
телефон - передача по проводам индивидуальной информации,
телевизор - передача радиоволнами изображения, одинаково для всех,
спутник и антена - передача информации через космос, радиоволнами,
интернет - передача любой информации по проводам и без проводов.