Program age;
var m:integer;
begin
readln(m);
if (m<=13) then writeln('детство');
if (m>=14)and(m<=24) then writeln('молодость');
if (m>=25)and(m<=59) then writeln('<span>зрелость</span>');
if (m>=60) then writeln('старость')
end.
Uses GraphABC;
begin
line(300,50,300,450);
line(150,250,550,250);
line(300,50,295,60);
line(300,50,305,60);
line(550,250,540,245);
line(550,250,540,255);
<span>end.</span>
Объект-объект: Андрей сын Ивана
объект-множество: диск является носителем информации
<span>множество-множество</span>: колеса входят в состав автомобиля
1 задача. Начальный путь С:\Соревнования\Команда.
Он поднялся вверх, попал в каталог Соревнования, а в нем есть каталоги Команда и Секции.
Он опустился в каталог Секции, а потом в подкаталог Баскетбол.
2 задача.
а) Ввести число 2500
Нажать кнопку * (умножение)
Ввести число 12
Нажать кнопку %.
Ответ: 300
б) Ввести число 3400
Нажать кнопку *
Ввести число 12
Нажать кнопку %
Ответ: 408
в) Ввести число 15100
Нажать кнопку *
Ввести число 12
Нажать кнопку %
Ответ: 1812.
1-с
2-d
3-a,c,d
4-a
5-b
6-b
7-d
8-a
9-d
10-a,c,d
11-b
12-a,e
13-a
14-b
16-a
17-a
18-b
19-d
20-b,c
21-a
22-b
23-a
<span>24-c</span>