Question

Помогите написать в Паскале программу диалогаНаписать в Паскале программу диалога компьютером с пользователем. (Спросить имя.Поздороваться,обращаясь по имени.Узнать о возрасте.Любимой книге.Любимом предмете в школе. За ранее спасибо)

Answer 1

Так как по условию задачи нам не нужно выводить на экран считанную информацию с клавиатуры,то вывод переменной нам будет необходим только в случае обращения по имени.

var a:string;
begin
writeln('Как тебя зовут ?');
readln(a);
writeln('Привет ',a,' !');
writeln('Сколько тебе лет? ');
readln();
writeln('Какой у тебя любимый предмет в школе?');
readln();
writeln('Какая у тебя любимая книга');
readln();
end.

Если же,необходимо запомнить всю полученную информацию,тогда используем этот вариант:

var a,b,c,d:string;
begin
writeln('Как тебя зовут ?');
readln(a);
writeln('Привет ',a,' !');
writeln('Сколько тебе лет? ');
readln(b);
writeln('Какой у тебя любимый предмет в школе ?');
readln(c);
writeln('Какая у тебя любимая книга ?');
readln(d);
write ('Значит тебя зовут ',a ,'. Тебе ',b,'. Твой любимый предмет - ',c,'. И твоя любимая книга - ',d);
readln();
end.

Answer 2

Программа на Паскале для диалога компьютера с пользователем:

program Dialog;
var
  name, age, favoriteBook, favoriteSubject: string;
begin
  writeln('Привет! Как тебя зовут?');
  readln(name);
  writeln('Приятно познакомиться, ', name, '!');
  writeln('Сколько тебе лет?');
  readln(age);
  writeln('Интересно! А какая твоя любимая книга?');
  readln(favoriteBook);
  writeln('О, ', favoriteBook, ' - отличный выбор!');
  writeln('А какой твой любимый предмет в школе?');
  readln(favoriteSubject);
  writeln('Спасибо за ответы, ', name, '! Было приятно пообщаться.');
end.

Эта программа будет задавать пользователю вопросы о его имени, возрасте, любимой книге и предмете в школе, а затем выводить сообщения, используя введенные пользователем данные.