Компьютер спрашивает: "Сколько вам лет?". Если ответ меньше 14, то отвечает "Вам еще рано получать паспорт". Если ответ больше или равен 14 отвечает "Поздравляю! Вы гражданин России!".
как вообще понимать этот вопрос? что нужно сделать? где нежно сделать?
можно только часть?
Var a: integer writeln('Сколько вам лет?'); readln(a); if (a>=14) then writeln('Поздравляю! Вы гражданин Росии') else writeln('Вам ещю рано получать паспорт); readln; end. как то так, только я точно не помню, если что не правельно выправиш
вторая строка
скинь ошибку
скигь полностью ошибку
writeln('Сколько вам лет?');
Встречено 'writeln', а ожидалось ';'
попробуй после "integer" поставить ";"
тоже самое
теперь это : Встречено '(', а ожидалось ':'
program qq; var a: real; begin write ('Сколько вам лет? '); read(a); if (a<=14) and (a<=14) <br> then writeln ('Вам еще рано получать паспорт') else writeln ('Поздравляю! Вы гражданин России!'); end.
я хз, я писал только в турбо паскале, и тут вроде правельно
Круто! А в чем собственно вопрос???
нужно написать программу на языке паскаль ABC