Даю 50 баллов!Напешите программу ** pascal Программу которая будет приветствовать и...

Question

Даю 50 баллов!Напешите программу на pascal Программу которая будет приветствовать и спрашивать как дела,но сначало нужно ввести имя​

Answer 1

program raf105;

var name:string;

begin

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

readln(name);

writeln('Привет, ',name);

writeln('Как твои дела?');

readln();

writeln('Понятно');

writeln('Мне пора уходить. Пока, ',name);

end.