Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Все лабораторные работы по паскалю / 2 лаб. Структурные операторы / Program16
.pas program prog16;
uses crt;
var i: byte;
begin
clrscr;
i:=0;
while i<10 do
begin
write(i);
inc(i);
end;
readln;
end.
uses crt;
var i: byte;
begin
clrscr;
i:=0;
while i<10 do
begin
write(i);
inc(i);
end;
readln;
end.
Соседние файлы в папке 2 лаб. Структурные операторы