Найти сумму ряда с заданной точностью.

@tek · Регистрация: 24.12.2011

Author24 — интернет-сервис помощи студентам

1.Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение > x и это значение < (a+b), иначе выести значение наименьшего из трех параметров. Вывод численных значений предварить выводом соответствующих сообщений.

2.Найти сумму ряда с заданной точностью.

s=1+(1/2^2) + (1/3^2) + (1/4^2) + (1/5^2)....
точность задается с руки например епсилон равен 0,01

3.

@versa4e · 26.12.2011, 20:31

2.

Pascal

var
  s,x,eps:real;
  i:integer;
begin
  write('Zadaite tochnost:');
  readln(eps);
  s:=1;
  i:=2;
  repeat
    x:=1/sqr(i);
    s:=s+x;
    i:=i+1;
  until abs(x)<eps;
  write(s:0:10);
end.

@morgan57 · 26.12.2011, 20:32

не создавайте дубль-темы

@tek · 26.12.2011, 20:34 **[ТС]**

хорошо учту в следуюий раз и спасибо что не оставили без внимания)

@Константинн · 26.12.2011, 21:24

3. Для проверки преподу введЁшь все нули или 1,0,0 как начальные значения а,в,с

Pascal

program xxx;
const n=12;
var a,b,c,i:integer;
    w,p:real;
begin
writeln('Vvedite a= ');readln(a);
writeln('Vvedite b= ');readln(b);
writeln('Vvedite c= ');readln(c);
w:=0;
for i:=1 to n do
 if i<4 then
  begin
   p:=a/i+b*sqr(i)+c;
   w:=p+w;
 end
else
 if (i>=4) and (i<=6) then
  begin
    p:=i;
    w:=p+w;
   end
else
 if (i>6)  then
   begin
    p:=a*i+b*i*i;
    w:=p+w;
   end;
writeln(w:7:5);
end.

@tek · 27.12.2011, 06:29 **[ТС]**

а еще не поможете немного?

4.

5.

Добавлено через 17 минут
6.Ввсет с клавиатуры строку символов.Проверить имеются ли среди введенных символов латинские буквы и заменить их начиная с 4 по 6 на символ (*)

@tek · 27.12.2011, 16:17 **[ТС]**

с последними задачками никто не поможет?

@tek · 04.02.2012, 15:31 **[ТС]**

Пожалуйста, не оставляйте без внимания

@tek 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 16
		1
	Найти сумму ряда с заданной точностью. 26.12.2011, 19:45. Показов 1606. Ответов 7 Метки нет (Все метки) 1.Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение > x и это значение < (a+b), иначе выести значение наименьшего из трех параметров. Вывод численных значений предварить выводом соответствующих сообщений. 2.Найти сумму ряда с заданной точностью. s=1+(1/2^2) + (1/3^2) + (1/4^2) + (1/5^2).... точность задается с руки например епсилон равен 0,01 3. 0

@morgan57 43 / 43 / 33 Регистрация: 05.12.2011 Сообщений: 201
	26.12.2011, 20:32	3
	не создавайте дубль-темы 1

@tek 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 16
	26.12.2011, 20:34 [ТС]	4
	хорошо учту в следуюий раз и спасибо что не оставили без внимания) 0

@tek 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 16
	27.12.2011, 06:29 [ТС]	6
	а еще не поможете немного? 4. 5. Добавлено через 17 минут 6.Ввсет с клавиатуры строку символов.Проверить имеются ли среди введенных символов латинские буквы и заменить их начиная с 4 по 6 на символ (*) 0

@tek 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 16
	27.12.2011, 16:17 [ТС]	7
	с последними задачками никто не поможет? 0

@tek 0 / 0 / 0 Регистрация: 24.12.2011 Сообщений: 16
	04.02.2012, 15:31 [ТС]	8
	Пожалуйста, не оставляйте без внимания 0