Oghmari
6 год назад
1) Определить будет ли принят на работе сотрудник если его стаж больше 10лет и возраст меньше 30 2)Введите двузначное число и пусть программа запишет его наоборот 3)Написать программу которая определит четное и нечётное число.Пожалуйста посчитайте пожалуйста :) Ответы к этим заданиям нужно записать как программу в Паскале
ОТВЕТЫ
Peters Brian
Oct 24, 2020
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 a>0 do begin
writeln(a mod 10);
a:=a div 10;
end;
end.
begin
read(a);
if(a mod 2 = 0) then writeln ('Число' , a, 'четное') else writeln ('Число' , a, 'нечетное');
end.
2. var a: integer;
begin
read(a);
while a>0 do begin
writeln(a mod 10);
a:=a div 10;
end;
end.
653
Смежные вопросы:
