Составьте программу, по которой компьютер десять раз запросит ввод любых чисел и в результате выведет среднее арифметическое значение введенных чисел (массив не использовать). Сделайте три варианта программы используя операторы цикла While, Repeat и For.

1 ответ

Посмотреть ответы

Megamozg

2205

1) С помощью while:
var

a,b,c,i:integer;

begin

i:=0;

b:=0;

writeln('Write 10 number:');

while i<10 do

begin

read(a);

b:=b+a;

i:=i+1;

end;

writeln('Average: ',b/10:0:0);

readln

end.

Хороший ответ

29 декабря 2022 13:16

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Определите количество чисел записанных в семеричной системе счисления, при условии, что они содержат в себе ровно 8 цифр, причем число не может содерж... Помогите пж, задача с div и mod... Последовательность чисел строится по следующему алгоритму: первые два числа последовательности принимаются равными 1; каждое следующие число последова... 1. Было проведено 9 запусков программы, при которых в качестве значений переменных я и k вводились следующие пары чисел: (1,1); (10, 7); (6,-12); (6,... После кодирования методом RLE получилась следующая последовательность байтов (первый байт - управляющий) : 00000011 10101010 00000010 10101111 1000111...