ТутРешу.Ру

Помогите пожалуйста Нужно заполнить целочисленный массив числами…

Задание:

Помогите пожалуйста Нужно заполнить целочисленный массив числами 1 — 10. Потом умножить каждый элемент массива на 2 и вывести что получилось наэкран

Решение:

varmas: array[1… 10]of integer; i: integer; beginfor i: =1 to 10 dobeginmas[i]: =i; mas[i]: =mas[i]*2; write (mas[i]: 3); end; end.




Знаете другой ответ?

Отправить свой ответ