Регистрация
dkfur
22.08.2021 23:47
Информатика
Есть ответ 👍

Шығып, кестені толтырыңдар. ларды қарап
Мысал
Программалық қамтама
Программалау жүйесі
Мәтіндік редактор
Графикалық редактор
Презентация редакторы
Электронды кестелер
Электронды оқу құралы
Ойын
ыбысты өңдеу редакторы
ейнеақпарат редакторы​

230
421
Посмотреть ответы 3

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

Kek1928
Kek1928
4,6(41 оценок)

ответ:Ема я такое решал не могу вспомнит

шя

Объяснение:

bykvav
bykvav
4,8(83 оценок)

какой-то непонятный.Друг,что нужно делать??)

nissanbaev25
nissanbaev25
4,5(38 оценок)
Var a: array[1..10] of integer; begin k: =0;           for i: =1 to 10 do begin           writeln('введите 10 чисел'); readln(a);           max: =a[i]; min: =a[i]           for i: =2 to 10 do begin           if a[i]> max then max: =a[i];           if a[i]< min then min: =a[i];   end;           s: =(min+max)/2;           for i: =1 to 10 do begin           if a[i]< s then k: =k+1; end;           writeln(k); end.

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