1. Задана таблица температур за три летних месяца. Определить максимальную температуру августа.
2. Задана таблица успеваемости по десяти предметам в группе из 25 студентов. Определить количество студентов, у которых по математике 5 (оценка по математике выставлена первой в таблице).



21 апреля 2011 в 17:22
я лично пишу на VB2008, но тем не менее – код в принципе одинаковый:
1.для температуры в августе можно создать массив const n=30(если индекс первого = 0), и по такому коду:
a(0)= max
0=imax
For i=0 to n
здесь вводим все температуры августа, а дальше так
If a(n)>a(i) then
max=a(i)
imax=i
End if
‘ For – это оператор цикла, If – это оператор “перебора”
Next i
‘End if – это завершение “перебора”, Next – завершает цикл.
и выводим соответсвующие значения
Понятно что перед этим вводим все переменные.
надеюсь что ответил на Ваш вопрос. Я не знаю как на паскале – но должно получится, я написал код не так как он должен быть на нем(просто я в нем давно уже не работаю)но идея должна быть ясна.