Сформируйте одномерный массив из 3 элементов (значения элементов укажет пользователь с клавиатуры). Выведите значения одномерного массива в столбец

Question

Информатика

Леонтьюшка

1 января, 07:38

Сформируйте одномерный массив из 3 элементов (значения элементов укажет пользователь с клавиатуры). Выведите значения одномерного массива в столбец

+4

Ответы (1)

Знаете ответ на вопрос?

Лукася · Answer 1

Program Massiv;

Var a: Array [1 ... 3] of Integer;

i: Integer;

Begin

WriteLn ('Напишите 3 числа через пробел') ;

For i : = 1 To 3 DoRead (a[i]) ;

For i : = 1 To 3 DoWriteLn (a[i]) ;

ReadLn;

End.