fork download
copy 
  1. program dificil;
  2. uses crt;
  3. var
  4. i:integer;
  5. begin
  6.      for i:=1000 to 1999 do
  7.          if i mod 11 = 5 then writeln(i);
  8.      readkey;
  9. end.
Success #stdin #stdout 0.01s 296KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
1006
1017
1028
1039
1050
1061
1072
1083
1094
1105
1116
1127
1138
1149
1160
1171
1182
1193
1204
1215
1226
1237
1248
1259
1270

1281

1292

1303

1314

1325

1336

1347

1358

1369

1380

1391

1402

1413

1424

1435

1446

1457

1468

1479

1490

1501

1512

1523

1534

1545

1556

1567

1578

1589

1600

1611

1622

1633

1644

1655

1666

1677

1688

1699

1710

1721

1732

1743

1754

1765

1776

1787

1798

1809

1820

1831

1842

1853

1864

1875

1886

1897

1908

1919

1930

1941

1952

1963

1974

1985

1996
https://ideone.com/POnrr
language:
Pascal (fpc 3.0.4)
created:
13 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!