program zad4;
uses crt;
var
s,i,n: integer;
begin
clrscr;
writeln('Вычисление
суммы первых n положительных чисел');
writeln('введите
количество суммируемых чисел');
readln(n);
s:=0;
for i:=1 to n do
<span>
begin</span>
<span>
If n mod i =0 then</span>
<span> s:=s+n;</span>
<span> end;</span>
writeln('сумма
первых ',n,' положительных чисел равна ',s);
readln;
<span>end.</span>
<span>
</span>
<span>
</span>
<span>Попробуй как-то так</span>
Родовое понятие-знак, а видовое это-буква,цифра,дорожный знак,знак препинания,знак арифметического действия и иероглиф
По алгоритмам? Ну на тебе несколько из разных тем.
1) Написать программу для машины Тьюринга, выполняющую сортировку 0 и 1 в двоичном слове.
2) В виде нормального алгоритма (Маркова) реализовать алгоритм сложения целых чисел, заданных в троичной симметричной системе счисления.
3) Проверить разрешимость множества всех простых чисел.
4) Доказать, что класс всех полуразрешимых подмножеств N совпадает с классом всех перечислимых подмножеств N.
Ну и т. д.
Собственно списки (точнее, книги с задачами), например, эти:
1) Дасгупта, Пападимитриу, Вазирани - Алгоритмы.
2) Кормен, Лейзерсон, Штайн - Алгоритмы построение и анализ.
Windows XP
Linux
<span>Mac OS
</span><span>Windows 2000</span>