напишите программу на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20 выводит эти числа на экрана и вычисляет их среднее арифметическое.
Ответ нейросети
06 May 2024 19:22
Конечно, вот программа на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит их на экран и вычисляет среднее арифметическое:
```pascal
program Генерация_Чисел;
var
число, сумма: integer;
счетчик: integer;
среднее: real;
begin
Randomize;
сумма := 0;
for счетчик := 1 to 10 do
begin
число := Random(20) + 1;
writeln('Случайное число ', счетчик, ': ', число);
сумма := сумма + число;
end;
среднее := сумма / 10;
writeln('Среднее арифметическое: ', среднее:0:2);
end.
```
Эта программа генерирует 10 случайных чисел от 1 до 20, выводит их на экран и находит их среднее арифметическое. Надеюсь, эта информация будет полезной для вас!
ПО распространяется в виде интернет-сервиса, специальные действия по установке ПО на стороне пользователя не требуются
SafeValue must use [property]=binding:
напишите программу на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20 выводит эти числа на экрана и вычисляет их среднее арифметическое.
Конечно, вот программа на Паскале, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит их на экран и вычисляет среднее арифметическое:
```pascal
program Генерация_Чисел;
var
число, сумма: integer;
счетчик: integer;
среднее: real;
begin
Randomize;
сумма := 0;
for счетчик := 1 to 10 do
begin
число := Random(20) + 1;
writeln('Случайное число ', счетчик, ': ', число);
сумма := сумма + число;
end;
среднее := сумма / 10;
writeln('Среднее арифметическое: ', среднее:0:2);
end.
```
Эта программа генерирует 10 случайных чисел от 1 до 20, выводит их на экран и находит их среднее арифметическое. Надеюсь, эта информация будет полезной для вас!
Комментарии