Вот блок-схема, надеюсь помог)
//Pascal ABC.NET v3.1 сборка 1172
Var
i:integer;
begin
for i:=1 to 9 do
writeln(i,'*5=',i*5);
end.
Алг Сумма
нач
цел s,i
s:=0
нц для i от 100 до 300
если mod(i,3) = 0 то
s:=s+i
все
кц
вывод "s = ", s
кон
Ответ:
не понятно. и тебе врятли помогут здесь
Объяснение: