Дан массив "B" содержащий 10 целых

Дан массив "B" содержащий 10 целых чисел.
B[1]=2
B[2]=1
B[3]=3
B[4]=5
B[5]=4
B[6]=9
B[7]=7
B[8]=8
B[9]=12
B[10]=10
Напишите программку (Pascal), которая вычисляет сумму значения всех частей массива и выводит ее на монитор.

Задать свой вопрос
Колян Кулешов
Оу! Опять эта задачка? Повседневные развлекушки?
1 ответ

Бон аппетит

uses crt;

var B:array[1..10]of integer;

   s:string;

   i,sum:integer;

begin

B[1]:=2;

B[2]:=1;

B[3]:=3;

B[4]:=5;

B[5]:=4;

B[6]:=9;

B[7]:=7;

B[8]:=8;

B[9]:=12;

B[10]:=10;

 For i:=1 to 10 do

  Sum:=sum+b[i];

write(sum);

writeln('He didnt do this job.');

end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт