Окытушы окушыларға 10 танбадан тұратын мәтiндi компьютерле теру тапсырмасын бердi. Оқушы мәтiндi куаты 9 танбадан тұратын алфавитпен тердi, ал Болат куаты 256 танба болатын алфавитпен терді. Екі түрлі алфавитпен жазылган акпарат келемiн аныктаныз және ерекшелiгiн түсiндiрiнiз. Акпарат келемі:
var
a: string;
b: integer;
begin
writeln('Сколько тебе лет?:');
readln(b);
if b > 17 then begin
writeln('В каком институте ты учишься?:');
readln(a);
writeln(a, ' хороший институт');
writeln('До следующей встречи!');
end
else
if b <= 17 then begin
writeln('В какой школе ты учишься?');
readln(a);
writeln(a, ' не плохая школа');
writeln('До следующей встречи!');
end;
end.