• Надо в Pascal составить программу. Помогите.

    1) Задает следующие вопросы и позволяет ввести ответы:
    Как тебя зовут?
    Введи номер класса в котором ты учишься.
    2) Выдает фразу :
    Имя, закончишь школу в ...... году. Верно? Да/нет.
    3) Позволяет ввести ответ и анализирует его:
    Если ответ да, то выводит фразу: " Ай да я! Ай да молодец!"
    Если ответ нет, то выводит фразу: " Ой! Неужели ошиблась?!"
    Если ответ ни да, ни нет, то выводит фразу: " Хм! Вечный школьник?!"

Ответы 1

  • begin    var N,X: string;    var K,Y: integer;  var M: longint;  writeln ('Как тебя зовут? ');  readln(N);  writeln ('Введи номер класса в котором ты учишься. ');  readln(K);  Y:=2016+1+11-K;  writeln (N,' закончишь школу в ',Y,' году. Верно? да/нет. ');  read(X);    if X='да'      then writeln ('Ай да я! Ай да молодец!')      else          if X = 'нет'          then writeln ('Ой! Неужели ошиблась?!')          else writeln ('Хм! Вечный школьник?!');end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years