Дан одномерный массив заполните его симвлами
Дан одномерный массив заполните его симвлами
Гость
Ответ(ы) на вопрос:
Гостьvar
a:array[1..255]of char;
n,m,k,i,l:longint;
begin
for i:=1 to 255 do a[i]:=chr(i);
for i:=1 to 255 do write(a[i],' ');
readln;
end.
Не нашли ответ?
Похожие вопросы