Составить блок-схему (желательно с помощью Конструктора Алгоритмов) по следующему коду через PascalABC:

[email protected] в категроии Разное, вопрос открыт 27.09.2018 в 23:49


const N = 5;
var a: array[1..N] of integer;
var i,j,l: integer;
var v: double;
begin
for i:=1 to N do begin
a[i] := random(0,100);
write( a[i] + ' ' );
end;
writeln;

v := a[1];
for i:=2 to N do begin
v := v + a[i];
end;
v := v / N;
writeln('Среднее арифметическое: ', v);
end.

0 ответов

Нет результатов.
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или  авторизируйтесь на сайте чтобы оставить ответ на вопрос.