Упишыть у слова пропущены буквы ч..рвониэ,з..л..ние.с..ниэ т..мние доберить до них переверни слова
164
389
Ответы на вопрос:
ответ:
var x,p,s,i,n: integer;
f: real;
begin
read(x,n);
for i: =1 to n do
begin
p: =p*x;
s: =s+i;
f: =f+p/s
end;
write(f);
end.
Популярно: Українська мова
-
мейрбек205.05.2023 21:56
-
Мандер08.08.2021 10:39
-
OGordienko107.06.2021 14:31
-
dizzone09.02.2022 04:06
-
DevilingKeks19.12.2020 10:13
-
0THEbigBOOM019.10.2022 18:24
-
230301025.04.2021 09:03
-
LetMaria06.05.2021 21:28
-
YanaKotsyuk19.05.2021 09:34
-
KeeRuSha15.11.2020 21:29