Делаю это все таки будет в
1.у компика есть мыш 2.у него есть монитор 3.клавиши 4.кнопка выключения 5.кнапко перезагрузки 6.процессор.
256 в 2-ую -100000<span>000;
256 в 8-ую - </span><span>400;
256 в 16-ую -100;
256 в 4-ую - 10000;
256 в 7-ую - 514;
</span>
Смотря откуда эта формула и как вы ее применяете
Похоже, что ПИ - просто функция без аргументов, т.е. ничего ставить не надо
Program z1;
var a:array [1..14] of integer;
begin
for i:=1 to 14 do
begin
read(a[i]);
if (a[i] mod 50 <>0) or (a[i]>10) then a[i]:=11;
end;
for i:=1 to 14 do writeln(a[i]);
end.