N=int(input())
if n<7:
print('ребёнок')
elif n<18:
print('ученица')
elif n<50:
print('работающися')
else:
print('пенсионерка')
да выполнение кр это обработка информации как и разгадывание кроссвордов а 3 это скорее всего запоминание информации так как надо запомнить движения и не забыть сделать и передача информации на конечности
<em>// PascalABC.NET 3.3, сборка 1540 от 16.09.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b,c):=ReadReal3('Введите через пробел три числа:');
if a*b*c<>0 then Writeln((a+b+c)/3)
end.
<u>Пример</u>
Введите через пробел три числа: 6.3 -12 8.143
0.814333333333333
Полный код на паскале
var
i: integer;
s: real;
begin
s := 0;
for i := 12 to 2001 do
s := s + i;
writeln(s);
s := 1;
for i := 2 to 201 do
s := s * i / (i + 2);
writeln(s);
s := 1;
for i := 1 to 33 do
if i mod 3 = 0 then s := s * 2;
writeln(s);
s := 2;
i := 10;
while i <= 13 do
begin
s := s + 11;
i := i + 1;
end;
writeln(s);
end.
Вывод программы и ответы соответственно
2002935
0.000146320050724284
2048
46