Поскольку я помню, заходишь в файл, создать, console application
var r:integer;
begin
randomize;
r:=random(101);
write(r);
end.
1) сделать маленькие лепешки. 2) положить в эти лепешки начинку и залепить. 3) положить их на сковородку и пожарить
640 битов вроде бы если если цифры не подводят
Var
x:integer;
begin
for x:=-5 to 5 do Writeln(x:2,x*x+5:4)
end.
<u>Результат</u>
-5 30
-4 21
-3 14
-2 9
-1 6
0 5
1 6
2 9
3 14
4 21
5 30