По теме циклы 1. написать программу на языке паскаль, выводящую все отрицательные члены арифметической прогрессии -11; -7… 2. написать программу на языке паскаль, находящую сумму первых десяти натуральных чисел. 3. написать программу на языке паскаль, находящую сумму положительных членов арифметической прогрессии: 17; 11; … help pls my lovely friend
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 можешь посмотреть у меня в профиле.