На языке pascalabc.net: 2) разработать программу циклической структурой в соответствии с предложенным вариантом, используя цикл с предусловием. дано действительное число х, натуральное число n. написать программу, которая вычисляет сумму последовательности, заданной формулы x^1/1! +x^2/2! +x^3/3! ++x^n/n!

245

344

Посмотреть ответы 2

Ответы на вопрос:

2839275

Информатика

4,7(4 оценок)

//pascalabc.net 3.1 сборка 1239 begin var x : = readreal('x ='); var s : = 0.0; var a : = 1.0; for var i : = 1 to readinteger('n =') do begin a *= x / i; s += a; end; writeln(s); end.

zugor55

Информатика

4,5(91 оценок)

'microsoft qbasic input a, b if a = b then a = 0 else a = -a: b = -b end if print a, b // pascalabc.net 3.1, сборка 1174 от 22.02.2016 begin var a,b: real; read(a,b); if a=b then a: =0 else begin a: =-a; b: =-b end; println(a,b) end.