program kolo;
uses CRT;
const pi:=3.14
var
p,r:integer;
begin
ClrScr;
wrietln ('Podaj r);
readln (r);
If r>0 then p:=pi*r*r;
else write ('Podaj r');
readkey;
end.
nie wiem co mam zmienić żeby działało ;/
pascal
Re: pascal
Juz dawno pascala nie uzywalem, ale na pierwszy rzut oka brakuje ' po jednym z wrietln.
Jaki jest dokladnie komunikat kompilatora?
Jaki jest dokladnie komunikat kompilatora?