Паскаль. 1 дано целое число N. Вычислить среднее арифметическое всех чисел из…

Question

53

Паскаль. 1 дано целое число N. Вычислить среднее арифметическое всех чисел из диапазона от 1 до N. 2 дано целое число N. Вывести на экран всенечетные числа из диапахона от 1 до N. Вычислить их сумму.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

no_problemz · Accepted Answer

57

no_problemz

18 апреля 2023

var N,i: integer; beginreadln (N); writeln (N+1) /2); end. var N,sum,i: integer; beginreadln (N); for i: =1 to N do if i mod 2<>0 then begin writeln (i); sum: =sum+i; end; writeln (sum); end.

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

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

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

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