Напишите программу, которая находит среднее арифметическое - вопрос №21333214 от aleksandrovadia1 13.01.2023 19:24

Question

Информатика: Напишите программу, которая находит среднее арифметическое всех элементов массива, которые делятся на 3 и заканчиваются на 1.

aleksandrovadia1 · Answer

var b,c,i:integer;a:array[1..10] of integer;beginfor i:=1 to 10 dobegina[i]:=random(10);end;for i:=1 to 10 doc:=c+a[i];b:=c div 10;for i:=1 to 10 dowriteln(a[i]);writeln( srednee ,b);end....