Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / prog16
.pas program prog16;
uses crt;
var x: byte;
begin
clrscr;
x:=7;
dec(x,3);
writeln('x=',x);
inc(x);
writeln('x=',x);
readln;
end.
uses crt;
var x: byte;
begin
clrscr;
x:=7;
dec(x,3);
writeln('x=',x);
inc(x);
writeln('x=',x);
readln;
end.
Соседние файлы в папке 1 лаб. Арифметические операции