Регистрация
Оксана0990
02.07.2022 21:49
Информатика
Есть ответ 👍

Конспект на тему "представление информации в форме таблиц"

184
453
Посмотреть ответы 1

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

hewiky
hewiky
4,5(84 оценок)

vara: array [1..100] of integer; i,ma,mi,n,s: integer; begin

readln(n); for i: =1 to n doread(a[i]); ma: =1; mi: =1; for i: =2 to n do beginif a[i]< a[mi] thenmi: =i; if a[i]> a[ma] thenma: =i; end;

if mi=ma then

write('вы ввели не число')

elsewrite((mi+ma)/2); end.

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