profile
Опубликовано 5 лет назад по предмету Информатика от ilyashmelev98

задача на паскале:
посчитать кол-во пробелов в тексте.

  1. Ответ
    Ответ дан PopCop312
    var a:string;
    i,b:integer;
    begin
    read(a);
    b:=0;
    for i:=1 to length(a) do
    if a[i]=' ' then b+=1;
    writeln(b);
    end.