Есть ответ 👍

Склавиатуры вводится число n найти максимальную возможность ряда следующего вида 1^2 2^2 3^3 сумма данного ряда не должна превышать введенного n. надо сделать в program. pas

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

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


Var sum: real; n,i: integer; begin write('n='); readln(n); sum: =1; write('1^2 '); for i: =2 to round(sqrt(n)) do if sum+power(i,i) writeln; writeln('сумма: ',sum); end.
sanakajpak
4,5(38 оценок)

i изменяется от 1 до 20 с шагом 1

Объяснение:

Цикл for по переменной i имеет вид:

for i := start to end do, где i меняется от start до end с шагом 1

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