Найти сумму 15 слагаемых вида (i-1)/2 (язык pascal)
Найти сумму 15 слагаемых вида (i-1)/2 (язык pascal)
Гость
Ответ(ы) на вопрос:
Гостьvar
i:integer;
s:real;
begin
for i:=1 to 15 do
s:=s+((i-1)/2);
writeln('Resultat: ', s)
end.
Не нашли ответ?
Похожие вопросы