Предмет: Информатика
Автор: AlishaAlisha
Вопрос задан 2 года назад

< >

Составить программу: Найти сумму 1/2+2/3+3/4+4/5+...+50/51 Прогр Паскаль

Ответы

Ответ дал: 0ri

1

var i:integer;

s:real;

begin

s:=0;

for i:=1 to 50 do

s:=s+i/(i+1)

write(s);

end.

Похожие вопросы

Русский язык

1 год назад

Пожалуйста подчеркните всё,все главные члены предложения и второстепенные.

Русский язык

1 год назад

Номер 91 помогите отдам 40 баллов, срочно!!!!!

Русский язык

2 года назад

Почему гражданин должен защищать своё отечество? Напиши 4предлож.

Окружающий мир

2 года назад

численноть дятлов на кубани

Другие предметы

7 лет назад

Помогите пожалуйста что общего в содержании животных в квартире и в сельской местности

Оʻzbek tili

7 лет назад

1.Qanday matn muhokama matni hisoblanadi? 2.muhokama matni ko'proq qayerda qo'llanadi? 3.Muhokama matnining boshqa matn turlaridan farqi nimada?

Химия

8 лет назад

Помогите пожалуйста!!!

Математика

8 лет назад

1. Запишите пропорции. а) 12 относится к 8, как 3 к 2 ; б) 0,8 относится к 4⁄9, как 9 к 50. 2. Составьте все возможные варианты верных пропорций, используя равенство: 0,5 * 16 = 2 * 4. 3.