Question

Задания по теме Циклы
1. Написать программу на языке Паскаль, выводящую все отрицательные члены арифметической прогрессии -11; -7…
2. Написать программу на языке Паскаль, находящую сумму первых десяти натуральных чисел.
3. Написать программу на языке Паскаль, находящую сумму положительных членов арифметической прогрессии: 17; 11; …
Help pls my lovely friend

Answer 1

2.
Program num;uses crt;var x,y,i,l:integer;begintextcolor(11);writeln('Введите i: ');readln(i);y:=0;for x:=14 to i do  //Вместо 14 можешь вписать любое натуральное число но не больше "i"beginy:=y+x;end;write ('Ответ', y);readln;end.
1 и 3 можешь посмотреть у меня в профиле.