Ответы на вопрос:
Var a,b,c,k: real; begin; write('введите первое число прогрессии: '); readln(a); write('введите разность прогрессии: '); readln(b); write('введите число членов прогрессии: '); readln(c); k: =((2*a+b*(c-1))/2)*c; writeln(k); end.
Популярно: Информатика
-
kuanyshbek200324.02.2022 03:34
-
edbaldin201703.06.2023 22:08
-
Ванесса0717.09.2021 01:27
-
tayna73p00m0k17.05.2021 14:37
-
TonyaOgneva13.12.2020 11:51
-
vhovalyg9018.10.2021 15:53
-
bogdan204121.04.2023 09:37
-
VladIslaV23167815.02.2023 01:35
-
nomeNome13No05.05.2022 00:59
-
skeych16.07.2020 16:44