Question

вывести таблицу ascii кодов до появления строчной буквы й написать на паскале плиизз

Answer 1

Вариант №1

var x: integer;s, k: char;
begin
k := chr(233);
while s <> k do
begin
write('Введите символ: ');
readln(s);
x := ord(s);
writeln('Код символа: ', x);
end;
end.

Вариант №2

var x, k: integer;
begin
k := 233;
for x:= 1 to k do
writeln('Код символа ', chr(x), ': ', x);
end.

Answer 2

на паскале абс

Answer 3

В чем же разница между вариантом №2 и вашими требованиями?

Answer 4

и там еще должен выводить что не выведено сколько ио элементов

Answer 5

а в 5 столбцов как делать

Answer 6

? помоги плиз