Расширенные операторы присваивания: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Mikst (обсуждение | вклад) (Новая: <source lang="Pascal">var i: integer; r: real; begin i := 1; writeln('i := 1; i = ',i); i += 2; // Увеличение на 2 writeln('i += 2; i = ',i); i *= 3; // Ум...) |
(нет различий)
|
Версия от 13:59, 9 января 2010
var
i: integer;
r: real;
begin
i := 1;
writeln('i := 1; i = ',i);
i += 2; // Увеличение на 2
writeln('i += 2; i = ',i);
i *= 3; // Умножение на 3
writeln('i *= 3; i = ',i);
writeln;
r := 6;
writeln('r := 6; r = ',r);
r /= 2;
writeln('r /= 2; r = ',r);
end.