Информатика. Программы в паскаль. Помогите пожалуйста.
1.Посчитать количество четных четырехзначных чисел.
2.Найти сумму 1+2(2)+3(2)+4(2)+…+N(2).
(2) -- подразумевалось как в квадрате
По дате
По рейтингу
1.
begin writeln(9000 div 2) end.
2.
var n:longint; begin readln(n); writeln(n*(n+1)*(2*n+1)div 6) end.
