Вопрос по информатике:
Помогите пожалуйста решить!!!!!!!!!!!!!!!!!!!!!!! в массиве В содержится 20 элементов. На четных местах числа от 50 до 100,на нечетных местах от 150 до 200.Все числа целые.Массив распечатать в одну строчку.Найти наибольший элемент.
- 24.08.2018 10:40
- Информатика
- remove_red_eye 4065
- thumb_up 54
Ответы и объяснения 1
var
a:array [1..20] of integer;
i,max:integer;
begin
max:=0;
for i:=1 to 20 do
begin
if i mod 2=0 then a[i]:=random(50)+50
else a[i]:=random(50)+150;
if a[i]>max then max:=a[i];
write(a[i]:4);
end;
writeln;
writeln('max=',max);
end.
- 25.08.2018 15:58
- thumb_up 50
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.