То эта информация полезная... :)
Считаем кол-во символов
Их: 63
63*16 = 1008 бит
1008/8 = 126 байт
Прикрепил ниже в файле TXT код программы
За блок-схемой напиши в личку
Program aaa;
var
a,b,c,i,z:integer;
begin
randomize;
z:=0;
for i:=1 to 10 do begin
a:=random(9)+1;
b:=random(9)+1;
write(a,'*',b,'=');
readln(c);
if(c=a*b) then inc(z);
end;
writeln('Из 10 заданий вы выполнили ',z,' заданий!');
end.