Використовуючи які об'єкти , можна візуалізувати дані табличної величини

140

267

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

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

lolkekcheburek2281

Информатика

4,8(31 оценок)

1.program z; var a: array [1..10] of integer; i,t: integer; s: real; beginfor i: =1 to 10 dobegina[i]: =random(1,100); write(a[i]: 4); if (odd(i)) and (odd(a[i])) then begins: =s+a[i]; t: =t+1; end; end; writeln; write('cреднее арифметическое = ',s/t); end.2.program z; var a: array[1..10] of integer; max,i: integer; beginwriteln('исходный массив'); for i: =1 to 10 dobegina[i]: =random(1,100); write(a[i]: 4); if a[i]> max then max: =a[i]; end; writeln; writeln('измененный массив'); for i: =1 to 10 dobeginif not(odd(a[i])) then a[i]: =max; write(a[i]: 4); end; end.