Предмет: История, автор: rahuag8584

Помогите пожалуйста 12.03.21

Приложения:

Ответы

Автор ответа: akkenzhe1985

0

я даже не знаю посмотри в книге может есть

rahuag8584: Пасиба!=)

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Русский язык, автор: 9059396580

слова с парными согласными

2 года назад

Предмет: Русский язык, автор: riki20

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

2 года назад

Предмет: Русский язык, автор: Вахбах

морфологический разбор слова деревянный, узкую, дряхлый

2 года назад

Предмет: Алгебра, автор: celldweller484

2-(4-х)²= х (3-х) найдите икс пж

9 лет назад

Предмет: Информатика, автор: KMLV

Что я не так делаю?
паскаль
поиск двух максимальных чисел

program ee;
const N = 5;
var
a : array [1..5]of integer;
iMax,max, iiMa,ma ,i : integer;
begin
for i:= 1 to N do begin
read (a[i]);
end;
write (' числа ', a );
iMax := a[1];// присваиваем для начального сравнения
for i := 1 to N do
if a[i] > iMax then//сравниваем 5 чисел и берём наибольшее
begin
iMax := a[i];//число
max := i;//на каком месте
end;
write (' первое максимальное значение ', iMax,' ',max );
iiMa := a[1];//присваиваем для начального сравнения
ma := 1;//
for i := 1 to N do//
if (iiMa < a[i])and(ma < max)then// ищем второе наибольшее число

begin
iiMa := a[i];//
ma := i//
end;
write (' второе максимальное значение ', iiMa,' ', ma);
end.

9 лет назад