Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N. Проверьте алгоритм трассировкой. Напишите программу на Паскале.
Program asd; USES crt; Var i,j,n:integer; BEGIN Clrscr; Writeln('Vvedite chislo: '); Read(n); j:=0; For i:=1 to N do j:=j i; Writeln(j); END.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
