Показать сообщение отдельно
mrCloud
в Бане
Сообщения: 4,723
Регистрация: 06.12.2009
Старый пост, нажмите что бы добавить к себе блог 21 января 2011, 17:53
Домашняя страница
  #825 (ПС)
теперь программа выглядит так
program namwe;
uses crt;
const by=2011;
var name:string;
age,oldyear:integer;
begin
clrscr;
writeln('What are you name?');
readln(name);
writeln('How old are you?');
readln(age);
if by < age then
begin
oldyear:=by-age;
writeln('Okay,you were burn in',oldyear);
readln;
end;
end.

но чуда не свершается.
всё также не работает.
-Цитата от иксуй! Посмотреть сообщение
-Цитата от alligator[7Вагон] Посмотреть сообщение
-Цитата от Hammer Посмотреть сообщение

Вообще странная программа, начиная от мелких ошибок, таких как:
и отсутствие в последнем условии.

Что за проверка 2011 < Введенный возраст?
ну получается что если вводимое число меньше 2011,то оно начинает узнавать год рождения по примеру сейчас год минус сколько лет = год рождения.
Наверное знак нужно наоборот поставить тогда
ОУ ФААК!!!
я идиот
точно)спасибо)

offline
Ответить с цитированием