profile
Опубликовано 5 лет назад по предмету Информатика от artyom62

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

  1. Ответ
    Ответ дан preceptor
    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.