Составить программу реализующую диалог комп: как тебя зовут:? ученик: Вася комп: сколько...

Question

Составить программу реализующую диалог комп: как тебя зовут:? ученик: Вася комп: сколько тебе лет? ученик: 15 комп: Вася, в следующем году тебе будет 16 лет

Answer 1

program z1;

  var v:integer;

      a:string;

    begin

      writeln('Как тебя зовут?');

      readln(a);

      writeln('Сколько тебе лет?');

      readln(v);

      writeln(a,', в следующем году тебе будет ',v+1,' лет');

     readln;

    end.