Написать программу на паскале: "найти номер первого максимального элемента во вводимой с клавиатуры последовательности чисел. условие окончания ввода – ввод числа 0."
ruma1974
3
20.05.2019 18:00
1
Другие вопросы по теме Информатика
Lol11111111000
13.06.2019 19:00
18larina18
16.11.2020 21:06
Kyivua777
16.11.2020 21:06
Almira19681
17.06.2019 14:40
dianapovorozny
17.05.2020 06:24
milkovvich
16.12.2020 16:30
efimovvvilyha
16.12.2020 16:30
Crispino
16.12.2020 16:30
Anilop11
16.12.2020 16:30
Популярные вопросы
- Если утонувшего человека не достать из воды в течение 5 мин, он неизбежно...
1 - Оценка разности, двойное неравенство (корень)...
3 - Сочинение-рассуждение что такое талант? (тезис, 2 аргумента, вывод)...
2 - Немецкий 7 класс Задание 4. Найди под чертой нужные слова. Die Natur auf unserem...
3 - Напишите рассказ о применении компьютера по английскому...
2 - рассказ Юрия Казакова Тихое утро .Какой эпизод рассказа вызвал особенно сильные...
3 - С БЕЛ.ЛИТОМ. Пытанні па змесце рамана “Каласы пад сярпом тваім” 1. Колькі...
1 - ответьте на во Что такое мультимедиа технологии? Их назначение....
1 - до конца теста 5 минут Мол❣️...
3 - вычеслить с правильным разбором ...
1
program zadacha_1;
var max,rd,i,txr:integer;
begin
i:=1;
repeat;
writeln('Введи ',i,' -ое число');
readln(rd);
if max<rd then txr:=i;
i:=i+1;
until rd=0;
writeln('Номер максимального элемента - ',txr);
end.