начало
ввод n
S :=0
S := S+i
вывод S
конец
i:=1,n,1
1 способ. Цикл со счетчиком.
i:=i+1
вывод S
конец
program summa;
var n,i,S:integer;
begin
writeln(‘введите n’);
readln(n);
S:=0;
i:=1;
while i<=n do
begin
S:=S+i;
i:=i+1;
end;
writeln(‘сумма=’,S);
readln;
end.
2 способ. Цикл с предусловием.
i:=i+1
вывод S
конец
program summa;
var n,i,S:integer;
begin
writeln(‘введите n’);
readln(n);
S:=0;
i:=1;
repeat
S:=S+i;
i:=i+1;
until i>n;
writeln(‘сумма=’,S);
readln;
end.
3 способ. Цикл с постусловием.
повторяй следующие действия
пока не станет b>8
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть