uses crt;
var i:integer;
procedure viv;
var k:integer;
begin
clrscr;
for i:=1 to 4 do k:=k+2;
writeln(k);
end;
begin
viv;
end.
uses crt;
var i:integer;
procedure viv;
var k:integer;
begin
clrscr;
for i:=1 to 4 do k:=k+2;
writeln(k);
end;
begin
viv;
end.
Vitaly1 писал(а):В отличие от Байсика компилятор Паскаля не устанавливает значение локальных числовых переменных в 0, поэтому, мы не можем знать, что выведет вышенаписанная программа. Сам можешь написать ее и запустить, и увидешь, что будет.
В отличие от бейсика, в паскале есть опция компилятора, которой мы можем выставить все объявляеые переменные по умолчанию в 0
Serega.I писал(а):В Turbo Pascal 7.0 никаких директив ненадо все итак в 0 инициализируется, полгода на нем заставляли писать, вы наверное с C путаете
tyomitch писал(а):Что, кто-нибудь будет участвовать в конкурсе Эрика Липперта (см. ссылку выше)? Конкурс длится до пятницы, приз - его книга про .net с автографом. Никому не надо, что ли?
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 104