1) 128000:8=16000 байт/c
2) 625*1024=640000 байт
3) 640000:16000=40 с - t1
4) 512000:8=64000 байт/с
5) 640000:64000=10 с - t2
6) 40-10=30
Ответ на 30 с
X, y: integer;
begin
readln(x, y);
if (x > 0) or (y > 0)
then
writeln(x * y)
else
writeln(x + y);
end.
С рисованием туго тут уж сам.