Question

Найти и вывести на экран сумму чисел от 20 до n Pascal циклы ​

Answer 1

Ответ:

program z;

var i, n, s: integer;

begin

read(n);

for i:=20 to n do s:=s+i;

write(s)

end.

Объяснение:

n >= 20 иначе программа выведет 0

Answer 2

Вот пример программы на языке Pascal, которая находит и выводит на экран сумму чисел от 20 до заданного значения n с использованием цикла:

pascalCopy code
program SumFrom20;

var
  n, sum, i: integer;

begin
  write('Введите значение n: ');
  readln(n);

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

  writeln('Сумма чисел от 20 до ', n, ' равна: ', sum);

  readln;
end.

В этой программе переменная n представляет заданное значение, а переменная sum используется для накопления суммы чисел. Цикл for выполняется от 20 до значения n, и каждое число добавляется к сумме.

Вы можете запустить эту программу в среде разработки Pascal или компиляторе, чтобы получить результат.