Помогите, пожалуйста!!
вывести на экран коды таблицы от 0 до 250 и их символы. выводить парами.
вывести на экран коды таблицы от 0 до 250 и их символы. выводить парами.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Var k: integer;
Begin
For k:=32 to 255 do begin
Write (k:4, chr(k):2,' ');
If k mod 8 = 7 then writeln;
End;
End.