Дан одномерный массив заполните его симвлами

4fhfhiukhriu 4fhfhiukhriu    3   18.07.2019 21:10    0

Ответы
2Velial1 2Velial1  25.08.2020 10:26
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика