1) Найти будет ли принят на работе сотрудник если его стаж

1) Найти будет ли принят на работе сотрудник если его стаж больше 10лет и возраст меньше 30 2)Введите двузначное число и пусть программка запишет его напротив 3)Написать программку которая обусловит четное и нечётное число.Помогите пожалуйста :) Ответы к этим заданиям необходимо записать как программу в Паскале

Задать свой вопрос
1 ответ
3. var a: integer;
 begin
  read(a);
  if(a mod 2 = 0) then writeln ('Число' , a, 'четное') else writeln ('Число' , a, 'нечетное');
 end.
2. var a: integer;
 begin
   read(a);
   while agt;0 do begin
     writeln(a mod 10);
     a:=a div 10;
   end;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт