Введите с клавиатуры массив В, из 10 частей целого типа, нумерация

Введите с клавиатуры массив В, из 10 частей целого типа, нумерация начинается с 1 и вывести все элементы массива увеличенные в 45 раз.

Задать свой вопрос
1 ответ

var

a:array[1..10] of integer;

b:array[1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

begin

read(b[i]);

a[i]:=b[i]*45

end;

for i:=1 to 9 do

write(a[i],' ');

write(a[10])

end.

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


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

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

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

Войти на сайт