Войти Регистрация Спроси ai-bota

Написать в паскале: for s=1+1/2+1/3+1/4+1/5

Показать ответ

Ответ:

irinakol30p00rgy

01.09.2020 06:51

Var
   S:real;
   n:integer;
Begin
S:=0;
Write('n = ');
ReadLn(n);
For n:= 1 to n do
    S:=S+1/n;
WriteLn('S = ',S);
End.

n = 5
S = 2.28333333333333

0,0(0 оценок)

Популярные вопросы: Информатика

Wika201720062006

15.04.2022 15:03

Нужно составить программу на языке паскаль сортировка от максимального к минимальному элементу чисел одновременного массива стандартного числа от -100 до 100...

ilkingaraev90

27.09.2022 03:41

1) в ящике лежит 180 клубков шерсти, красных, белых и желтых. сообщение о том, что взяли желтый клубок, несёт в себе 1 бит информации белых клубков столько же, сколько и красных....

78787877

04.05.2020 05:13

Ширина картинки в 1.5 раза меньше ее длины .разрешение картинки 6 мегапикселей,сколько пикселей расположено по ширине картинки? а)1500 б)2000 в)3000...

Еденарог5555

19.11.2020 07:46

Pascal ! 3.5. дан одномерный массив с(n). удалить элементы одномерного массива меньшие заданного числа а; выведите на печать преобразованный массив и число его элементов. выведите...

silverfinn

03.02.2020 14:23

5. ftp. а електронна пошта; б пересилання файлів; в гіперпосилання; г всесвітня павутина....

blaccyee0666

27.02.2023 16:00

Ввести массив с клавиатуры и проверить есть ли среди элементов массива заданное число...

CherryGirll

27.02.2023 16:00

Напишите программу, которая заполняет массив из n элементов случайными целыми числами в диапазоне [ a , b ] и определяет номера двух элементов этого массива, которые расположены...

vinnikdanil

20.12.2020 11:38

Слой однотипных клеток, образующийся в результате дробления яйца и покрывающий его желток...

Merlin6666

20.12.2020 11:38

Сколько граммов алюминия содержится в 5 моль оксида алюминия? ответ: 270 г....

ninakamenskix2000

20.12.2020 11:38

Доказать, что две высоты треугольника, пересекаясь, не делятся пополам....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку