В первой задаче после выполнения программы переменная P будет равна 24.
Во второй задаче переменная S будет равна 12.
В третьей задача переменная S будет равна 41.
В четвёртой задаче переменная c будет равна 9.
В пятой задаче переменные x и t будут равны 5, а переменная y = 11.
program summation;
var i, summa: Word;
begin
summa := 0;
for i := 1 to 10 do
summa := summa + i;
WriteLn('l + 2 + .+ 10 = ', summa);
end.
2) Решил бы еще, но замучаюсь всё это в пэйнте рисовать:)
Как смог, расписал. Смотреть в приложении.