По информатике! программа паскаль через цикл for(с предусловием) 1.вычислить сумму ряда s=1+1, 5+2+2, 5+3+3, 5++30 (где / - дробь)2.вычислить сумму ряда s= 2+2/1 + 2/2+2/3+2/; 2/i; с точностью e=0, 1
1) var i:integer; s:real; begin s:=0; for i:=1 to round((30-1)/0.5)+1 do s:=s+i*0.5+0.5; writeln('s = ',s:6:1); end.
Результат: s = 914.5
2) const e=0.1; var i:integer; s:real; begin i:=1; s:=2; while 2/i>e do begin s:=s+2/i; i:=i+1; end; writeln('s = ',s:5:2); end.
Результат: s = 9.20
chaa140
13.04.2021
#include <stdio.h>#include <time.h> int main(void) { int left, right, num = 5; time_t t;
scanf ("%d %d", &left, &right);
if(left >= right) { fprintf(stderr, "min_num is greater or equal than max_num!\n"); }
printf ("left = %d right = %d \n", left, right); /* Intializes random number generator */ srand((unsigned) time(&t)); /* Print num random numbers from left to right */ while (num > 0) { printf ( "%d ", left + (rand() % (right + 1 - left)) ); num--; } return 0;}
suturinavaleriya51
13.04.2021
#include <stdio.h>#include <time.h> int main(void) { int left, right, num = 5; time_t t;
scanf ("%d %d", &left, &right);
if(left >= right) { fprintf(stderr, "min_num is greater or equal than max_num!\n"); }
printf ("left = %d right = %d \n", left, right); /* Intializes random number generator */ srand((unsigned) time(&t)); /* Print num random numbers from left to right */ while (num > 0) { printf ( "%d ", left + (rand() % (right + 1 - left)) ); num--; } return 0;}
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
По информатике! программа паскаль через цикл for(с предусловием) 1.вычислить сумму ряда s=1+1, 5+2+2, 5+3+3, 5++30 (где / - дробь)2.вычислить сумму ряда s= 2+2/1 + 2/2+2/3+2/; 2/i; с точностью e=0, 1
var i:integer; s:real;
begin
s:=0;
for i:=1 to round((30-1)/0.5)+1 do
s:=s+i*0.5+0.5;
writeln('s = ',s:6:1);
end.
Результат:
s = 914.5
2)
const e=0.1;
var i:integer; s:real;
begin
i:=1;
s:=2;
while 2/i>e do
begin
s:=s+2/i;
i:=i+1;
end;
writeln('s = ',s:5:2);
end.
Результат:
s = 9.20