1. напишите программу, где пользователь вводит любое - вопрос №100743441 от Dasěuke345 09.10.2021 20:49

Question

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

Dasěuke345 · 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....