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

Question

Информатика

Фрося

23 сентября, 14:50

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

+5

Ответы (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.