Question

​(По желанию)​Написать программу на языке Pascal для решения одной задачи на выбор:- на отметку  "4"   Организовать  горизонтальный  числовой  ряд 1 2 3 4 5 ….10; - на отметку "5"    Найти сумму ряда S = 15+16+17+...+n.      на 5 пожалуйста напишите даю 50 баллов Я.П ПАСКАЛЬ не питон ​

Answer 1

Ответ:

2 задача:

var i,n,s:integer;

begin

 read(n);

 s:=0;

 for i:=15 to n do begin

   s+=i;

 end;

 print(s);

end.

1 задача:

var i:integer;

begin

 for i:=1 to 10 do begin

   print(i);

 end;

end.

Объяснение: нужны пояснения - скажи

Answer 2

Конечно, вот пример программы на языке Pascal для решения задачи "на отметку '5' - найти сумму ряда S = 15+16+17+...+n":

pascalCopy code
program SumSeries;
var
  n, sum, i: Integer;
begin
  write('Введите значение n: ');
  readln(n);

  sum := 0;
  for i := 15 to n do
  begin
    sum := sum + i;
  end;

  writeln('Сумма ряда S = ', sum);

  readln;
end.

В данном примере программа запрашивает у пользователя значение n и вычисляет сумму ряда S = 15+16+17+...+n. Затем результат выводится на экран.

Для компиляции и выполнения программы на языке Pascal, вам потребуется среда разработки, поддерживающая Pascal (например, Free Pascal или Turbo Pascal).