Регистрация
Эва637
09.03.2022 15:26
Информатика
Есть ответ 👍

Во время исполнения программа хранится :

249
398
Посмотреть ответы 3

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

parchiev14
parchiev14
4,6(71 оценок)
Впамяти этого устройства.
kaldyn007
kaldyn007
4,7(49 оценок)
Впамяти устройства
Толик566
Толик566
4,7(99 оценок)
1.  var a: array[1..100] of integer; i, n, min, max, imin, imax: integer; begin read(n); for i: =1 to n do  read(a[i]); min: =a[1]; imin: =1; if a[i]< min then begin min: =a[i]; imin: =i; end; max: =a[1]; imax: =1; if a[i]> max  then begin max: =a[i]; imax: =i; end; a[imax]: =2; a[imin]: =2; end. 2.  var a: array[1..100] of integer; i, n, s, k: integer; begin read(n); s: =0; k: =0; for i: =1 to n do  read(a[i]); if (a[i] mod 2=0)and(a[i]> 0) then begin s: =s+a[i]; k: =k+1; end; writeln((s/k): 17: 2); end.

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