Напишите программу на pascal, которая по введенному возрасту определяет, к какой возрастной группе относится человек: ребенок или взрослый.

Var a: ineger;
begin
write('Введите возраст: ');
read(a);
if a>=18 then writeln('Это ребенок');
else writeln('Это взрослый');
end.

Пользуйся

Объяснение:

//fpc 3.0.0

program CheckColour;

var

k,l,m,n,kmod,lmod,mmod,nmod,klflag,nmflag: integer;

begin

kmod:=0;

lmod:=0;

mmod:=0;

nmod:=0;

klflag:=0;

nmflag:=0;

read(k, l, m, n);

kmod := (k mod 2);

lmod := (l mod 2);

mmod := (m mod 2);

nmod := (n mod 2);

//writeln(k, l, m, n);

//writeln(kmod, lmod, mmod, nmod);

klflag:=(kmod xor lmod);

nmflag:=(nmod xor mmod);

//writeln(klflag, nmflag);

if klflag = nmflag then writeln(true)

else writeln(false);

end.

Input 2 3 5 7

output FALSE

Клетка 1, 1 - черная

Алгоритм — конечная совокупность точно заданных правил решения произвольного класса задач или набор инструкций, описывающих порядок действий исполнителя для решения некоторой задачи.

Первый тип — линейный алгоритм; такой, в котором все действия выполняются в строгом порядке, последовательно, одно за другим.

Второй тип — разветвляющийся алгоритм; такой, в котором выполняются те или иные действия в зависимости от выполнения или невыполнения не­коего условия. 

 Третий тип — циклический алгоритм; такой, в котором присутству­ют повторяющиеся действия с какой-либо изменяющейся величиной, так называемым параметром.

Компьютер - машина, выполняющая алгоритмы.

Basic, C++, Java, Python, Pascal.

Алгоритм, записанный на «понятном» компьютеру языке программирования, называется программой.