Даны алгоритмы и из них нужно сделать работающую программу на паскале. . 50 ​

может быть крик?

решение должно иметь од 20 до 5000

скорость в мб/c 100/8 = 12,5 мб/c

переведем в кб/с = 12,5 * 1024 =   12800 кб/с

тогда время передачи будет равно t= 100/12800 = 0,0078125 секунд 

триста восемьдесят девять миллиардов,триста шестьдесят пять миллионов, четыреста две тысячи, двести один.

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.