Это ариф. прогрессия, a1 = 5, d= 4
S = (2*a1 + d*(n-1))*n/2
(10 + 4n - 4)*n/2 = (3 + 2n)*n = 324
2n^2 + 3n - 324 = 0
Решаешь квадратное уравнение и берешь положительный корень.
Но можно решить и простым накапливанием суммы
1) Ввод a = 5, d= 4, S = 0, n = 0
2) Цикл, пока S < 324
2.1) S = S + a
2.2) a = a + d
2.3) n = n + 1
2.4) Конец цикла
3) Вывод n
4) Конец
Ну, типа так:
ПУСТЬ в ячейке A1 находится число 5.
Адреса ячеек набирать ЛАТИНСКИМИ!!!!
ПУСТЬ, например. в ячейке В2 пишем:
=(9,2*cos(A1)^2+abs(sin(A1/11))/(2*A1+1))^(1/2)
и должен получиться ответ....
Ну а 10 пример что-то нечетко напечатан, хотя идея та же: формула начинается со знака равно, работаем не с конкретным Х, а с АДРЕСОМ ЯЧЕЙКИ, где этот х и лежит... Попробуй, получится :))
Var I,m,Z,X,y:real; Begin X:=6.7; Y:=7.9; M:=0.4; Z:=1; For i:= x to y do Begin I:=i+m; Z:=z*i;End;Writeln(z);End.<span>
</span>
Для второго рисунка в программе вместо y+8 шаг 4 надо взять y+4 шаг 2
program sqrsum;
var sum,a,b,i:integer;
begin cls;
sum:=0;
write('Введите начальное нечетное число ');
readln(a);
write('Введите конечное нечетное число ');
readln(b);
write('Сумма квадратов нечетных чисел от ',a,' до ',b,' равна ');
repeat
sum:=sum+sqr(a);
a:=a+2
until a>b;
writeln(sum)
end.
ussrex
Вот тебе универсальное решение на ABC Pascal, которое поможет посчитать сумму квадратов нечетных чисел в любом диапазоне (можно и четные посчитать)
