Что будет выведено на экран в результате выполнения программы, если в качестве данных вводится последовательность символов: a, b, c, d, e. Var a: array [1 . . 5] of char; i: integer; str: string; begin writeln(' Введите данные в массив '); for i:=1 to 5 do readln(a[i]); str:= a[1];
Добавить комментарий