Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Задача на тему цикл с параметром Паскаль. Определить среди 10 чисел какое из них наибольшее и вывести порядковый номер этого числа.

5-9 класс

Lubyanov64 20 мая 2013 г., 4:42:42 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Arinakelbisova
20 мая 2013 г., 7:36:53 (10 лет назад)

Program P;
Var
    n, i : Integer;
    max, iMax: Integer;
Begin
    Write('Enter 10 numbers ');
    
    for i := 1 to 10 do
    Begin
        Read(n);
        
        if i = 1 then
        Begin
            max := n;
            iMax := i;
        End
        else
            if n > max then
            Begin
                max := n;
                iMax := i;
            End;
    End;
    
    WriteLn('Max = ', max);
    WriteLn('index = ', iMax);
    
    ReadLn;
End.

Ответить

Другие вопросы из категории

сообщение занимает 6 страниц по 40 строк, в каждой строке записано по 60 символов. Информационный объем всего сообщения равен 9000 байтов. каков

информационный вес одного символа? сколько символов в алфавите языка, на котором записано это сообщение

Читайте также

Запросить стороны треугольника и определить,является ли он разносторонним,равносторонним или равнобедренным. Учесть: третья сторона не должна превышать

сумму двух других,иначе треугольник не существует. Задача на тему "Программирование ветвлений на Паскале".

Прошу, помогите! Задачи на тему - линейные алгоритмы. 1)От станции до озера S км.Туристы, направляясь от станции к озеру, полтора часа шли пешком со

скоростью А км/ч, а затем сели на попутную машину, которая ехала со скоростью В км/ч. За какое время туристы добрались до озера? 2)В школьном коридоре длиной 56 м нужно выкрасить пол. Выкрасив часть коридора длиной 22 м, израсходовали А кг краски. Сколько ещё нужно краски, чтобы докрасить пол? 3)Чтобы сварить 4 порции пшенной каши, нужно взять 220 г пшена, 1 л молока и зо г сахара. Сколько потребуется этих продуктов, чтобы сварить N порций каши? Плиииз помогите. Меня на этой теме не было и ничего не понимаю!

Ребята,нужно в паскале решить задачи на массив.

1) в массиве 50 элементов. Определить количество чисел больше,равны и меньше нуля.
2) в массиве 20 элементов. Опеределить количество чисел,у которых:
Цифра десятков кратна 2(или просто само число кратно 2) и число больше нуля.
Решение по типу этой задачи. Числа вводятся по запуску программы.



Вы находитесь на странице вопроса "Задача на тему цикл с параметром Паскаль. Определить среди 10 чисел какое из них наибольшее и вывести порядковый номер этого числа.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.