Напишите программу Паскаль. Найти сумму первых n в квадрате чисел
===== PascalABC.NET =====
begin
SeqGen(ReadInteger('N ='), n -> n * n, 1).Sum.Print
end.
Не знаком с тонкостями написания нейросетей, не могу ничего сказать
Сколько этих учителей? 5? 10?
ООП прост, как кусок хозяйственного мыла, пока с ним не вылазишь в С++ )))
В моей школе была пожилая женщина, которая ничего не знала больше учебника. В соседней школе была ровно такая же ситуация.
У меня другой опыт общения с учителями по информатике
У с++ устаревшая объектная модель, она такая только там и осталась. Поэтому и С++ на другие языки переходить сложно.
Отлично, общайтесь дальше.
Приятно было пообщаться, но ждут дела. Хорошего вечера!
Не могу, увы того же сказать про приятности, поскольку что-то пытаться объяснять людям, изначально зашоренным чем-либо, и не имеющим при этом реальных аргументов - задача неблагодарная.
А вот хорошего вечера - почему не пожелать?
Прикрепляю код программы в файле.
program brainly;
var
n, i :integer;
summ :real;
Write('Введите n: ');
ReadLn(n);
for i := 1 to n do
summ += power(i, 2);
Write('Сумма квадратов первых ', n, ' чисел равна: ', summ);