<span>Знаменитый спортсмен Джекки Джойнер-Керси, победитель многочисленных олимпийских соревнований, в том числе по бегу с барьерами и без, прыжкам в высоту и длину, болел астмой.
В массиве записей хранится следующая информация о спортсменах: фамилия, вид спорта, лучший результат этого спортсмена. Видом спорта могут быть: прыжки в длину, прыжки в высоту, тяжелая атлетика. Определить лучшего спортсмена в заданном виде спорта. Использовать подпрограммы для ввода массива и для определения лучшего спортсмена</span>
Литература,архитектура,живопись,музыкальные произведения.
Любовь это чувство которое невозможно передать словами.Любовь бывает разная,и каждый из них необычен.Любовь это чувство от которых плывешь в облаках,от которых сердце бьется чаще
Var k,a:integer;
x,D: char;
begin
k:=0;
a:=14;
writeln('Продолжите ряд чисел 2,5,8,11,');
readln(a);
if a=14 then
k:=k+1
else
k:=k;
writeln('Выберите лишнее A)дом B)иглу C)бунгало D)контора ', x);
readln(D);
if D='D' then
k:=k+1
else
k:=k;
writeln(k);
end.