Добавил:
Studfiles2
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
var a : byte ;
begin
while a := 0 do
if a := 0 then b := b / c ; { }
end.
begin
while a := 0 do
if a := 0 then b := b / c ; { }
end.