1 задача. Вычислить произведение квадратов n первых натуральных чисел

Question

1 задача. Вычислить произведение квадратов n первых натуральных чисел. Для любого n введенного с клвитуры.2 Найти первое четное натуральное числоЮ кубкоторого больше числа x, введенного с клавитуры. 3. Даны вещественные числа b1,b2,… b10. (ввести с клавитуры). Определите среднее арифметическое тех из них, которые кратны числу n, введенному с клавитуры.

Answer 1

61

mixa377

09 сентября 2022

1) var s,i,n,a: integer; begin a: =1; s: =1; readln (n); for i: =1 to n do begin s: =s*sqr (a); a: =a+1; end; writeln (s); end.2) var a,i: integer; x: real; begin a: =0; readln (x); repeat a: =a+2; if power (a,3) >x then writeln (a); until power (a,3) >x; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: