Вфайле input.txt имеются следующие записи: 6 18 23 7 13 27 33. нужно составить программу,которая определяет среднее арифметическое чисел файле input.txt. и записывает ответ файл output.txt. первое число файле input.txt указывать на количество чисел, следующих за ним. т.е(нужно 18+23+7+13+27+33 поделить на 6)
112
122
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1439 от 09.05.2017 // внимание! если программа не работает, обновите версию! begin writealltext('output.txt', readalltext('input.txt').tointegers.skip(1).average.tostring(4)) end.
const k=10;
var a: array[1..k] of integer;
n,m,i: integer;
begin
// 1
write('n, m: ');
readln(n,m);
for i: =1 to k do
begin
a[i]: =random(m-n+1)+n;
write(a[i],' ');
end;
writeln;
// 2
for i: =1 to k do
begin
a[i]: =2*i+1;
write(a[i],' ');
end;
writeln;
// 3
a[1]: =1; a[2]: =1;
write(a[1],' ',a[2],' ');
for i: =3 to k do
begin
a[i]: =a[i-2]+a[i-1];
write(a[i],' ');
end;
writeln;
end.
пример:
n, m: 5 15
5 6 11 8 6 14 8 7 9 10
3 5 7 9 11 13 15 17 19 21
1 1 2 3 5 8 13 21 34 55
Популярно: Информатика
-
Rodofatos13.11.2022 15:24
-
Angela1100120.02.2023 05:23
-
мафінка23.03.2020 17:12
-
H2Oя09.02.2023 15:18
-
ivanalekseev2003301.10.2020 05:32
-
Лілія21016.03.2022 19:48
-
AlekseyLascot12.05.2023 07:43
-
begimot8110.05.2023 20:25
-
dasha0009701.05.2022 10:03
-
NikNameXxX02.09.2020 23:09