Андрей
Помогите пожалуйста написать программу, которая считает сумму всех чисел от 1 до n. Программа нужна на паскале
нужно 2 программы 1 с While,а 2 с Repeat
нужно 2 программы 1 с While,а 2 с Repeat
блин, ему же в циклах надо!
1. s:=0;
i:=1;
while in
могу ошибиться в синтаксисе - на паскале не писал уже несколько лет
sum:=(1+n)*n/2;
s := (n+n*n)/2
все