Пользовательский интерфейс
Нет, потому что компьютер это машина не умеющая самостоятельно мыслить, как человек.
begin
var a := ArrRandomReal(10,-99,99);
a.Println;
a[a.IndexMax] := a.Average;
a.Println;
end.
На PascalABC.NET
Вот функция проверки числа на простоту
bool isSimple(int n){
for(int i=2;i<=sqrt(n);i++)
if(n%i==0) return false;
return true;
}
Ответ:
Вот код
Объяснение:
Program pr2(output);
var x,y:real;
var i:integer;
begin
x:=-5;
writeln(' x y ');
for i:=1 to 21 do begin
y:=5-x*x/2;
writeln(x:4:1,'|',y:5:2);
x:=x+0.5
end;
end.