PROGRAM ThreeSequences(INPUT, OUTPUT); VAR Number: ARRAY[1 .. 3, 1 .. 10] OF INTEGER; ArithmeticAverage: ARRAY[1 .. 3] OF INTEGER; I, J: INTEGER; BEGIN {ThreeSequences} Randomize; {Генерирует 3 последовательности по 10 случайных чисел} FOR I := 1 TO 3 DO FOR J := 1 TO 10 DO Number[I][J] := Random(10) + 1; {Выводит последовательности и считает среднее арифметическое} FOR I := 1 TO 3 DO BEGIN WRITE('Sequences: '); ArithmeticAverage[I] := 0; FOR J := 1 TO 10 DO BEGIN WRITE(Number[I][J]:3); {Складывает все числа последовательности} ArithmeticAverage[I] := ArithmeticAverage[I] + Number[I][J]; END; WRITELN; {Делит на количество чисел последовательности} ArithmeticAverage[I] := ArithmeticAverage[I] DIV J; WRITELN('ArithmeticAverage: ', ArithmeticAverage[I]); END; END. {ThreeSequences}
PROGRAM ThreeSequences(INPUT, OUTPUT);
VAR
Number: ARRAY[1 .. 3, 1 .. 10] OF INTEGER;
ArithmeticAverage: ARRAY[1 .. 3] OF INTEGER;
I, J: INTEGER;
BEGIN {ThreeSequences}
Randomize;
{Генерирует 3 последовательности по 10 случайных чисел}
FOR I := 1 TO 3
DO
FOR J := 1 TO 10
DO
Number[I][J] := Random(10) + 1;
{Выводит последовательности и считает среднее арифметическое}
FOR I := 1 TO 3
DO
BEGIN
WRITE('Sequences: ');
ArithmeticAverage[I] := 0;
FOR J := 1 TO 10
DO
BEGIN
WRITE(Number[I][J]:3);
{Складывает все числа последовательности}
ArithmeticAverage[I] := ArithmeticAverage[I] + Number[I][J];
END;
WRITELN;
{Делит на количество чисел последовательности}
ArithmeticAverage[I] := ArithmeticAverage[I] DIV J;
WRITELN('ArithmeticAverage: ', ArithmeticAverage[I]);
END;
END. {ThreeSequences}
Смотря для какого тебе языка надо, вот для VisualBasic
Sub Neskolko_Chisel
Dim Sum, i, a, N As Integer
N = InputBox("Введите количество чисел")
For i = 1 to N
a = InputBox("Введите число")
Sum = Sum + a
Next i
End Sub
вот для с++
#include <iostream>
#include <conio.h>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
int a, N, Sum, i;
Sum = 0;
N = 0;
a= 0;
cout << "Введите количество чисел! ";
cin >> N;
for (i = 1; i <= N; i++)
{
cout << "Введите число!" ;
cin >> a;
Sum = Sum + a;
}
cout << Sum;
_getch();
}