Регистрация
Мухосранск462
14.01.2021 14:04
Информатика
Есть ответ 👍

Окушы матинды 16 танбадан туратын алфавитпен терды,ал болат куаты 256 танба болатын афавитпен терды екы турли алфавитпен жазылган акпарат колемин аныктаныз.ХЕП
​

256
262
Посмотреть ответы 1

Ответы на вопрос:

4553234
4553234
4,8(56 оценок)

Вот вариант на Паскале

var a, nn, i, max, maxi : integer;

BEGIN

read(nn); max := 0; maxi := 0;

for i := 1 to nn do begin

 read(a);

 if abs(a) >= abs(max) then begin

  max := a; maxi := i;

 end;

end;

write(maxi);

END.

Популярно: Информатика