Создать базу данных ,
выполнить все пункты ( спортсмены могут быть любые , главное выполнить)

1

var a,b,p:integer;

begin

 writeln('Введите длину');

 readln(a);

 writeln('Введите ширину');

 readln(b);

 writeln('Периметр прямоугольника = ',2*(a+b),' см')

end.

2

var a:integer;

begin

 writeln('Введите число');

 readln(a);

 if a > 0 then a:= a + 1;

 if a < 0 then a:= a - 6;

 if a = 0 then a:= 16;

 writeln(a);

end.

3

var a:integer;

begin

 writeln('Введите число');

 readln(a);

 if a > 0 then a:= a * 5;

 if a < 0 then a:= a * a;

 if a = 0 then a:= 15;

 writeln(a);

end.

4

var a,b:integer;

begin

 writeln('Введите 1 число');

 readln(a);

   writeln('Введите 2 число');

 readln(b);

 if a > b then writeln(a)

 else

   writeln(b);

end.

Особенности интерфейса ОС Windows

Так что такое Windows? Это операционная система, которая используется на многих компьютерах. С вероятность девять к одному, что Вы, человек, который читает данную заметку, являетесь пользователем операционной системы Windows. Сейчас существует много операционных систем в мире, у всех их одно предназначение, но различий масса. Приведу названия некоторых из них:

Windows.

Linux.

Mac.

Unix.

Это ДАЛЕКО не весь список операционных систем. А как вы думаете, что лежит в основе управления смартфонами? Да, да, именно операционные системы, и их также существует несколько разновидностей.

Те названия ОС, что я привел выше – не полные, так как имеют несколько версий. Одни различаются по времени создания, другие по функциональности. Одной только Windows, существует около десяти штук.

Удач