Пожалу та не как в комп а в тетради написать надо пж очеееееенььььь
Пожалу та не как в комп а в тетради написать надо пж очеееееенььььь
Гость
Ответ(ы) на вопрос:
ГостьProgram z1; Var i:integer; s:real;Begin s:=1; i:=2; While i<=10 do begin s:=s+1/i; i:=i+1; end; write(s);End.
Не нашли ответ?
Похожие вопросы