Вычислительная техника в инженерных расчетах и моделировании. Черный А.А. - 229 стр.

UptoLike

Составители: 

229
if I0=14 then
begin
GB7000;
goto 2;
end;
writeln('Конец работы');
close(F0);
end.{Конец программы}
     if I0=14 then
       begin
         GB7000;
         goto 2;
       end;
     writeln('Конец работы');
     close(F0);
end.{Конец программы}




                                229