Вывести массив из 50 случайных чисел из диапазона от –100 до 50,найти количество положительных чисел и сумму чисел оканчивающихся на 5. ВЫПОЛНИТЬ в паскале
249
299
Ответы на вопрос:
Const eps=0.00001; var b,c: integer; a,s: real; begin s: =0; b: =1; c: =1; a: =1/b+1/c; while abs(a)> =eps do begin s: =s+a; b: =2*b; c: =c*3; a: =1/b+1/c; end; writeln('s = ',s: 8: 5); end. результат: s = 3.49998
Популярно: Информатика
-
elyp2818.08.2020 20:25
-
aleks172127.10.2022 02:50
-
cot57925.01.2023 05:12
-
Fjk123cg05.07.2022 10:46
-
0KULLEP022.05.2023 10:29
-
annaYanna108.01.2021 01:54
-
paskhin201721.01.2020 16:41
-
ДмитрийJ30.09.2022 19:39
-
динозаврррррр29.03.2021 11:14
-
yoongi201710.04.2022 14:10