Скачиваний:
20
Добавлен:
06.02.2016
Размер:
131 б
Скачать
program p07;
uses crt;
var i: byte;
begin
clrscr;
i:=9;
while i>-1 do
begin
write(i);
dec(i);
end;
readln;
end.
Соседние файлы в папке 2 лаб. Структурные операторы