Объясните необходимости выбора разного формата нумерации для обычных и концевых сносок
157
249
Ответы на вопрос:
Program a_1; uses crt; var i,n,sum: integer; begin write('введите n '); readln(n); i: =0; sum: =0; repeat i: =i+1; sum: =sum+i; until i=n; writeln('сумма чисел от 1 до ',n,' равна ',sum); end. program b_2; uses crt; var i,n,sum: integer; begin write('введите n '); readln(n); i: =0; sum: =0; repeat i: =i+1; sum: =sum+i*i; until i=n; writeln('сумма квадратов чисел от 1 до ',n,' равна ',sum); end. program v_3; uses crt; var i,n,sum: integer; begin write('введите n '); readln(n); i: =0; sum: =0; repeat i: =i+1; if (i mod 2 = 0) then sum: =sum+i; until i=n; writeln('сумма чётных чисел в диапазоне от 1 до ',n,' равна ',sum); end. program g_4; uses crt; var i,n,sum: integer; begin i: =9; sum: =0; repeat i: =i+1; sum: =sum+i; until i=99; writeln('сумма всех двузначных чисел равна ',sum); end.
Популярно: Информатика
-
Pozitivchik123425.10.2020 22:09
-
dbarkhatova11.05.2020 23:15
-
kristin2008.09.2022 04:08
-
annar200121.03.2023 12:08
-
alenadevyataya04.08.2021 03:05
-
Vanya140710.09.2022 11:48
-
Iikhovaydov31.01.2021 23:55
-
Mrenderstail28824.02.2022 18:48
-
viktoriaedel29.03.2023 13:33
-
DianaDusha16.03.2021 15:35