Написать анализ и обьяснить что делает программа.
program ggl;
var
n, i, sum : integer;
a : array [1..1000] of integer;
begin
randomize;r
eadln (n);
sum := 0;
for i := 1 to n do
begin
a[i] := random (100);
write (a[i], ' ');
sum := sum + a[i];
end;
writeln;
write (sum / n);
end.

1

Ответы и объяснения

  • thn
  • отличник
2014-04-14T21:18:19+04:00
Я не совсем понимаю как именно вам нужно оформить задание и как вам это требовалось:)
Однако...
судя по блоку var:
В памяти выделяются три целочисленные переменные и массив целочисленных переменных.
Затем программа считывает число с клавиатуры.
Затем переменная sum становится равной 0.
затем программа выполняет цикл от 1 до введённого числа n:
В массиве в каждой i-той ячейке сохраняет случайное число от 0 до 100
Затем выводит каждое i-тое число.
А затем к переменной sum прибавляет это число.
Затем она выводит sum/n, т.е. полученную сумму чисел, делённую на количество чисел.
А если так объяснить.. ну, пользователь вводит число, а она выводит указанное количество случайных чисел от 0 до 100, одновременно в таком же порядке заполняя ими массив, а потом в конце пишет их среднее арифметическое:)