var
a,b,c,max:integer;
begin
writeln('Введите возраст призеров:');
readln(a,b,c);
if (a < b) and (a < c) then
begin
max := a;
writeln('Самый младший - первый призер, ему ',max,' лет.');
end;
if (b < a) and (b < c) then
begin
max := b;
writeln('Самый младший - второй призер, ему ',max,' лет.');
end;
if (c < a) and (c < b) then
begin
max := c;
writeln('Самый младший - третий призер, ему ',max,' лет.');
end;
end.
2. My_game.txt - может быть записана инструкция к игре .
3. My_game.bmp - может храниться заставка к игре
4. My_game.avi - может быть записан демонстрационный ролик к игре
5. My_game.wav - может быть записано музыкальное сопровождение к игре.