Составить программу на Паскале, которая находит сумму цифр от 1 до 25
СРОЧНО
Ответы на вопрос
Ответил danulpopov
0
var
i, sum:integer;
begin
For i:= 1 to 25 do
sum := sum + i;
Writeln(sum);
end.
Результат:
325
i, sum:integer;
begin
For i:= 1 to 25 do
sum := sum + i;
Writeln(sum);
end.
Результат:
325
Ответил AnonimusPro
0
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write(range(1,25).Sum());
end.
//Версия 3.3, сборка 1611
begin
write(range(1,25).Sum());
end.
Новые вопросы
Русский язык,
2 года назад
Английский язык,
2 года назад
Химия,
8 лет назад
Литература,
8 лет назад
Алгебра,
9 лет назад