Впервый час работы, рабочий изготавливает a деталей, за последующий час на d деталей больше, чем за предыдущий. разработайте программу, которая подсчитает, сколько деталей изготовил рабочий за k часов работы.
203
341
Ответы на вопрос:
Var a,d,k,i,ak,s: integer; begin writeln('a, d, k: '); readln(a,d,k); s: =0; ak: =a-d; for i: =1 to k do begin ak: =ak+d; s: =s+ak; end; writeln('s = ',s); end. пример: a, d, k: 10 2 5 s = 70
Var n: integer; x,s: real; begin s: =0; write('n = '); read(n); write('x = '); read(x); for n: = 1 to n do s: =s+power(x,n); write('s = ',s) end.
Популярно: Информатика
-
vladugan28.11.2021 19:57
-
Severelinka18.07.2022 09:33
-
NikoYuqa129.04.2021 06:07
-
adil7824522.09.2021 07:48
-
alexaaa209.03.2022 16:48
-
loptf06.03.2023 16:39
-
frankovskaaalin25.12.2021 07:42
-
dlink16207.08.2021 07:53
-
IvanDremin124.11.2021 22:42
-
prokopchukalex28.08.2020 05:26