Var s,k: integer;

begin

s := 0;

for k := 9 to 13 do

s := s + 9;

writeln(s);

end.
решите задачу как в паскале обьяснение не нужно

allornothing    2   20.05.2020 15:58    5