Var a,b,c:integer;
p,n:string;
begin
readln(p)
;For a:=1 to length(p) do
begin
n:=copy(p,a,1);
If (n=' ') or (n=',') then
begin
If b>c then c:=b;
b:=0
end
else
b:=b+1;
end;
If c=0 then c:=b;
writeln (c);
<span>end.</span>
Растр выглядит в виде точек - Пикселей.
<span>Векторное изображение задается формулами. </span>
Операция div - это целочисленное деление, т.е. сколько раз поместится число 3 в числе 8. Ответ будет 8/3=2
Есть еще другое деление - mod, т.е. остаток от целочисленного деления.
Если 8 mod 3 = 666666666666667
Нужно держать голову прямо и что бы расстояние между компьютером и головой должно быть 90-80 см ,для того что бы не потерять зрение , спина должна быть прямая и не сутулая что бы не потерять осанку и не нарушить позвоночьник