8 lines
207 B
ObjectPascal
8 lines
207 B
ObjectPascal
// Цикл for. Сумма всех двузначных чисел
|
|
|
|
begin
|
|
var s := 0;
|
|
for var i:=10 to 99 do
|
|
s += i;
|
|
Println('Сумма всех двузначных чисел =',s);
|
|
end. |