Напишите программу на языке паскаль, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит эти числа на экран и вычисляет их среднее
5-9 класс
|
арифметическое.
var a,i,b:integer;
s:real;
begin
a:=0;
for i:=1 to 10 do begin
b:=random(20)+1;
a+=b;
write(b,' ');
end;
writeln;
s:=a/10;
writeln(s);
end.
Другие вопросы из категории
ПОЖАЛУЙСТА :) Полный реферат
варианты ответов
А)понятием
Б)объектом
В)предметом
Г)системой
Читайте также
двузначных чисел в диапазоне от А до B, в которых первая цифра ровно в 2 раза больше второй.
программы представлен ниже:
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
Вывести на экран таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 20 с шагом 1 фунт (1 фунт=400г)
Пример оформления результата:
1 фунт=0,4 кг
2 фунт=0,8 кг
....
20 фунт=8 кг
и произведение нечетных чисел
в диапазоне от 1 до 10.