1. напишите программу, где пользователь вводит любое - вопрос №110073842 от katyazabriyan 10.12.2021 09:53

Question

Информатика: 1. напишите программу, где пользователь вводит любое целое положительное число. а программа суммирует все числа от 1 до введенного пользователем числа.

katyazabriyan · Answer

program Summa;var  n, s, i: Integer; begin  Write ( Введите число: );  ReadLn (n);  s := 0;  for i := 1 to n do    s := s + i;  WriteLn ( Сумма = , s);  ReadLn; end....