Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Ольга456
0 / 0 / 1
Регистрация: 28.05.2013
Сообщений: 40
#1

Пусть компьютер, узнав возраст человека, дальнейшую беседу ведет по двум вариантам (Pascal ABC) - Pascal ABC

28.05.2013, 12:28. Просмотров 568. Ответов 1
Метки нет (Все метки)

Пусть компьютер, узнав возраст человека, дальнейшую беседу ведет по двум вариантам. Если возраст больше 17, то компьютер должен задать вопрос: "В каком институте ты учишься?" и получив ответ, глубокомысленно заметить "Хороший институт". Если же возраст меньше или равен 17, то соответственно - "В какой школе ты учишься?" и "Неплохая школа". После этого, каков бы ни был вариант, компьютер должен попрощаться: "До следующей встречи!"ПОМОГИТЕ МНЕ ПОЖАЛУЙСТА ЭТО СДЕЛАТЬ
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.05.2013, 12:28
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Пусть компьютер, узнав возраст человека, дальнейшую беседу ведет по двум вариантам (Pascal ABC) (Pascal ABC):

Дано число n, определяющее возраст человека (в месяцах). Выразить возраст человека годах и в месяцах - C++
Здравствуйте,помогите пожалуйста. Дано число n(1≤n≤1188), определяющее возраст человека (в месяцах). Выразить возраст человека годах и в...

Известны год и номер месяца рождения человека, определить возраст человека - Visual Basic
Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня (январь – 1 и т.д.). Определить возраст человека...

Определить, на сколько лет возраст самого старого человека превышает возраст самого молодого - C#
Решите задачу: В массиве хранится информация о годе рождения каждого из 30 человек. Определить, на сколько лет возраст самого старого...

Перевести код Pascal ABC NET в Pascal ABC - Pascal ABC
Помогите, плиз Сделал на Pascal ABC NET, но нужно его открыть в обычном Pascal ABC. Не компилит этот код, помогите исправить. uses ...

Turbo Pascal, Pascal ABC, Free Pascal, PascalABC.NET - в чем разница? - Pascal
Всем привет, решил изучать Паскаль, но на форуме увидел 4 его версии - Turbo Pascal, Pascal ABC, Free Pascal, PascalABC.NET и не понял, в...

Возраст человека - MS Access
Как вычислить возраст человека и поставить "+" в нужную ячейку от "17" до "23+"?

1
Striker
Ведущий программист C#
240 / 219 / 49
Регистрация: 19.08.2012
Сообщений: 498
Записей в блоге: 1
28.05.2013, 12:59 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses
  CRT;
 
var
  s: string;
  a: integer;
 
begin
  Writeln('Сколько вам лет?');
  Readln(a);
  if (a > 17) then
  begin
    Writeln('В каком институте ты учишься?');
    readln(s);
    Writeln('Хороший институт');
  end
  else
  begin
    Writeln('В какой школе ты учишься?');
    readln(s);
    Writeln('Неплохая школа');
  end;
  Writeln('До следующей встречи!');
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.05.2013, 12:59
Привет! Вот еще темы с ответами:

Возраст человека - Pascal
Ввести возраст человека (от 1 до 150) и вывести его с последующими словом "год", "года" или "лет". Пример: Введите возраст: 24..66...

Определить возраст человека - C#
Задача Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня. Определить возраст человека (число...

Определить возраст человека - C#
всем, привет! помогите, пожалуйста решить задачу на с #! Известны год, номер месяца и день рождения человека, a также год, номер...

Определить возраст человека - Turbo Pascal
Дорогие форумчанины, выручайте. Завтра зачёт, готовлюсь, как проклятая и тут застреваю на задаче (причём последняя в списке =.=) ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru