АЛ
Алексей Леонов
Сставить программу которая вычисляет сумму натуральных чисел от 10 до 15 и выводит на экран результат!! ! В Pascal ABC
Pascal ABC!!! Очень срочно!!!!
Pascal ABC!!! Очень срочно!!!!
на уроках спать меньше надо
придешь на пересдачу
с: =0;
фор и: =10 ту 15 ду бигин
с: =с+и;
энд;
райтлн (с);
примени формулу арифметической прогрессии
program sum;
begin
writeln( 'sum = ', 10+11+12+13+14+15 );
end.
Var I,J: Integer;
Begin
J:=0;
For I:=10 to 15 Do J:=J+I;
WriteLn(J);
End;