Мы, вообще-то были одной из двух групп из всего строительного факультета, у которых был экзамен по программированию.

Но, если честно говорить, то на экзамен это смахивало очень мало.

На консультации нам сказали, что будет 2 задания: один по массивам, либо по функциям, но если по функуиям, то самые азы; второй по операторам.



На деле оказалось ещё интереснее: задание было только одно. И это ещё больше уверило меня в мысли, что это вообще зачёт, как у всех остальных групп, только вместо слов зачёт\незачёт будет стоять оценка.



А задание..мм...

составить программу, соторая произведёт сложение всех натуральных чисел, начиная от 21 так, чтобы их сумма была больше, чем 120, но меньше, чем 150. Вывести на экран кол-во слагаемых и конечную их сумму.



Ёлки-палки, и я умудрилась и здесь напортачить. Программа упорно отказывалась работать, если я вместо конкретного конечного слагаемого писала "n"



если вкратце, то само тело программы выглядело у меня так:



sum:=0;

slagaemoe:=1;

repeat for i:=21 to 26 (вот в этом месте по идее должно стоять n, и программа сама должна была дойти до того, сколько слагаемых надо) do

begin

sum:=sum+i;

slagaemoe:=slagaemoe+1;

end;

until sum<150;

writeln(sum, slagaemoe);



вот интересно, можно ли было через другие операторы это сделать?



Пойду сейчас оценку узнавать.