Programozás topic - Mobilarena Hozzászólások

Hirdetés

Legfrissebb anyagok

Mobilarena témák

PROHARDVER! témák

IT café témák

GAMEPOD témák

LOGOUT témák

Mobilarena

Frissítve: 2023-12-13 06:18 Téma összefoglaló

Mobilarena

Új hozzászólás Aktív témák

heihachi addikt

#307
#306 heihachi
2004-10-26 20:38:06

Új Válasz
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

heihachi

addikt

#306 heihachi

#306 heihachi
Ne viccelj, ilyet Te is tudsz írni! De ha estig ráér Én megírom Neked.

Elég szar, de megy:

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;

const
n = 10;

var
j : integer;

begin
for j := 1 to n do begin
if sqrt(j)-round(sqrt(j))=0 then writeln(j);
end;
readln;
end.

Új hozzászólás Aktív témák

Téma tudnivalók

● olvasd el a téma összefoglalót!

Aktív témák

Hirdetés

Új fizetett hirdetések

Üzleti előfizetők hirdetései

Állásajánlatok

Számítástechnikai értékesítő

Cég: Laptopműhely Bt.

Város: Budapest

Részletek