Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / prog14
.pas program prog14;
uses crt;
var n,m,d: byte;
begin
clrscr;
n:=7; writeln(' Исходное число : ', n);
d:=n div 2; writeln(' Целочисленное деление : ', d);
n:=n mod 2; writeln(' Остаток от деления : ', m);
readln;
end.
uses crt;
var n,m,d: byte;
begin
clrscr;
n:=7; writeln(' Исходное число : ', n);
d:=n div 2; writeln(' Целочисленное деление : ', d);
n:=n mod 2; writeln(' Остаток от деления : ', m);
readln;
end.
Соседние файлы в папке 1 лаб. Арифметические операции