Составите программу; которая вычисляет сумму квадратов всех натуральных чисел от 1 до 500
Function SumSqr(N : Longint) : Longint; Begin If N>0 then SumSqr:=N*N+SumSqr(N-1) else SumSqr:=0; end; Begin Writeln(SumSqr(500)); end.
Да, графика несовместима, а ассемблерные вставки в школе - кому они нужны?
сейчас да, уже и не надо... это когда под ДОС писали было актуально
устарел TP - это и так понятно
К тому же на НЕТ-платформе во вставках нет необходимости - там единый формат dll - пишите модули на чем хотите и вызывайте из Паскаля напрямую.
Это я уже тоже успел оценить.
А работа с LINQ to Objects, которая в 3.0 появилась запинывает в угол Pyton.
*Python
А встроенные в язык на уровне примитивов стеки, очереди, списки, словари, ... это же песня!
Я буду только "ЗА", если pabc.net будут использовать во всех учреждениях , но наверняка будет это не сразу.
Конечно. Потому что надо научить сначала "старых собак новым штукам".
#include using namespace std; int main() { unsigned long long n=0; for(int i=1;i<=500;i++)n+=i*i;<br> cout<<n;<br> return 0; }
Вы программу свою запустить пробовали? В int n сумма 121250 не разместится.
121250 - а откуда такое число? У меня сумма вышла 41791750
Не обратил внимания, что там квадраты, посчитал просто сумму и плюс описка, сумма натуральных 125250.
Заменил int на unsigned long long. Переполнение быть не должно.