Пользователь вводит слова или числа (целые или вещественные) через пробел. вывести на экран количество чисел в строке. например: ввод - "3,14 число 5 или 17", вывод - "3".кумир ( или рус - не принципиально)

Program pr1;
const n=19;
var i, l: integer;
    Dat: array [1..n] of integer;
    New: array [1..n] of integer;
begin
 write('Dat: ');
 for i:=1 to n do begin
                  Dat[i]:=random(30)-15;
                  write(Dat[i],' ');
                  end;
 writeln();
 write('New: ');
 l:=0;
 for i:=1 to n do if (Dat[i]>=0) and (Dat[i] mod 8<>0) then begin
                                                           l:=l+1;
                                                           New[l]:=Dat[i];
                                                           end;
 for i:=1 to l do write(New[i],' ');
end.

1) наличие аттестата о среднем образовании достаточно для поступления в ВУЗ - ложное высказывание (наличие аттестата о среднем образовании необходимо, но не достаточно для поступления в ВУЗ )
2) если один угол в треугольнике прямой, то треугольник будет тупоугольным - ложное высказывание (если один угол в треугольнике прямой, то треугольник будет прямоугольным)
3) Музыка Баха слишком сложна - не является высказыванием
4) Солнце есть спутник Земли - ложное высказывание (Солнце не есть спутник Земли)
Ложные высказывания: 1), 2), 4)