Pascal abc. дан одномерный массив из n действительных чисел. найти номер последнего максимального элемента.
lenamotinaozavac
1
30.09.2019 19:30
2
Другие вопросы по теме Информатика
2006adelya
15.04.2021 20:59
aibekauezhanme
15.04.2021 20:58
Senn7
15.04.2021 20:56
busiginaev2015
05.07.2019 03:30
SoniaSor
22.06.2019 11:20
ABI04
14.07.2019 11:32
alisheralisher2
02.07.2019 23:00
Популярные вопросы
- Анализ: 1. Проанализируйте этапы формирования грибов. Как вы думаете, какие...
3 - Выбери ряд, в котором не встречается ни одного слова с чередующейся гласной...
2 - 55 000 дм2 - 500 см2 20 см3 + 2000 см3 800 м2 : 4 м 800 м2 + 1 а32 000 м2 +...
2 - очень Complete the gaps with will be going to or Present Continuous and the...
2 - Записать закон движения центра масс тела после отрыва х=х(t), y=y(t)....
3 - 1. Закончите утверждение: «Чем больше первоначальная неопределённость знания,...
2 - Сочинение о положительном и отрицательном влияние человека на природу...
2 - НУЖНО РЕШИТЬ 2,3,5 номеразадание на фото...
3 - На рисунке представлено климатическое районирование Австралии по методу Кеппена....
2 - Жалғыз ағаш орман болмас,жалғыз кірпіш қорған болмас мағынасы...
1
Program asd;
Uses crt;
var a:array [1..100] of integer;
n,k, i,max:integer;
begin
writeln ('Размер массива');
readln (n);
for i:=1 to n do
begin
readln (a[i]);
if a[i]>=max
then begin
max:=a[i];
k:=i;
end;
end;
writeln (k);
end.