Кто шарит паскаль? Сделайте 1 программку?

Кто шарит паскаль? Сделайте 1 программу?

Задать свой вопрос
1 ответ

var

year:integer;

begin

writeln('Введите год');

readln(year);

if (year gt; 2000) and (year lt; 2101) then

writeln('Этот год относится к XXI веку') else

writeln('Этот год не относится к XXI веку');

end.

Леенман Эмилия
Воу, спасибо :(
Олег
:)*
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт