Такая программа,хотелось бы чтобы при вводе да (при считывании b) запускался контейнер,но мне выдает что да-неизвестное имя.Программа в паскале.
var
a,b,c,d:string;
e,f,g,h:integer;
begin
write ('Здраствуй,как тебя зовут??');
read (a);
write ('Привет,');
write (a); write ('!');
write ('Сколько тебе лет?');
read (e);
if e>30 then write ('Мое уважение.')
else write ('Малявка!!!');
write ('Давай сыграем в игру??Я загадываю число,ты пытаешься отгадать?Числа от одного до 10!');
read (b);
if b= да then begin
randomize;
f := random (10);
read (g);
if g=f then write ('Ты угадал(а)!!!')
else ('Я победил :З');
end
end.
Если поможет пролайкаю и оценю как лучший ответ.

var  a,b,c,d:string;  e,f,g,h:integer;begin  write('Здраствуй,как тебя зовут??');  readln(a);  writeln('Привет, ',a);  write('Сколько тебе лет?');  readln(e);  if e>30 then writeln('Мое уважение.')  else writeln('Малявка!!!');  write('Давай сыграем в игру??Я загадываю число,ты пытаешься отгадать?Числа от 0 до 9!');  readln(b);  if b='да' then begin    randomize;    f := random (10);    Write('Вводи! '); Readln(g);    if g=f then writeln('Ты угадал(а)!!!')    else writeln('Я победил! :З загадано ',f);  endend.