следующая тема »

[25 Август 2025, 14:03:59]

Новости, реклама:

[25 Август 2025, 14:03:59]

Новости, реклама:

[tony_tosh]

program www;
var real:i,z;
      string: x,y;
use historymassive.pics;
use historymassive.unknown_historics;
/*функция Тоширский описана ранее*/
for i:=1 to z;
x:=rand("Иди на йух","Креффедко");
y:=rand(historymassive.pics)+rand(historymassive.unknownhistorics);
z:=5*(get_quantity_of_posts(Тоширский));
writeln (y,x);
next i.

end.