Регистрация
20Fox06
27.03.2023 14:25
Информатика
Есть ответ 👍

Решите неравенство log1/3(2x+1)-log1/3(25+2x)> 3+log1/3(x+2)

219
254
Посмотреть ответы 1

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

ymnik3345
ymnik3345
4,5(18 оценок)

а) 

var i,n,s: integer; begin readln(n); s: =0; for i: =1 to n do begin s: =s+i; end; writeln(s); end.

б)

var a,n,i,s: integer; begin readln(n); s: =0; a: =2; for i: =1 to n do begin s: =s+a; a: =a+2 end; writeln('сумма первых ',n,' четных чисел равна ',s); a: =1; s: =0; for i: =1 to n do begin s: =s+a; a: =a+2; end; writeln('сумма первых ',n,' нечетных чисел равна ',s); end.

 

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