Įrašo „Vibe.lt – artėja oficialūs metai!“ komentarai

Autorius: Mokyklinis T.

Mokyklinis T. — Tue, 29 Sep 2009 06:35:26 +0000

program Bevardë0;
var n,r:real;
var a:string;
begin
WriteLn(‘Ivesk slaptazodi’);
Readln(a);
If a=’tratata’ then
begin
writeln(‘slaptazodis OK’);
writeln(‘iveskite n’);
readln(n);
if n2 then r:=(9-2/7*n)/(4+n)
else r:=sqrt(n+3.5);
Writeln(‘rezultatas ‘,r:0:2);
end
else writeln(‘GG’);
Readln;
end.

Autorius: Mokyklinis T.

Mokyklinis T. — Tue, 29 Sep 2009 05:50:42 +0000

program Bevardë0;
var a:string;
begin
WriteLn(‘Ivesk slaptazodi’);
Readln(a);
If a=’tratata’ then
begin Writeln(‘jusu slaptazodis ‘,a);
end
else writeln(‘netinka’);
Readln;
end.

Autorius: Mokyklinis T.

Mokyklinis T. — Tue, 29 Sep 2009 05:25:01 +0000

sveikieji tipai:
byte – apima reiksmes nuo a(0;255); 1b. 0..2^8 – 1 / 1b
word – [0;65535] 2b. 0..2^16 – 1 / 2b
cardinal [0;4294967296] 0..2^32 – 1 / 4b
shortint [-1287;127]-2^7..2^7-1 / 1b
integer [-35768;32767]-2^15..2^15-1 / 2b
longint [-2147483648;2147483647] -2^31..2^31-1 /4b

realaus tipo kintamieji, uzema daugiau vietos.

Autorius: Tomas

Tomas — Mon, 21 Sep 2009 09:48:59 +0000

@arktic: kad ir dabar :*

Autorius: arktic

arktic — Mon, 21 Sep 2009 09:35:41 +0000

už šitą įrašą nuo manęs individualiai gausi…. galvon :D iš didelės meilės :D
Vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint vaibint :)