===== PascalABC.NET =====
begin
// 1
var a := ArrRandom(5,0, 60);
a.Println;
a[:3].Sum.Println;
// 2
var b := ArrRandom(20, 0, 50);
b.Println;
Println(b[18]+b[19])
end.
Можно заменить на
read(x1,y2,x3,x4);
Системное программирование — программы, обеспечивающие управление компьютерной системой, такими как процессор, ОП (оперативная память), сетевое обеспечиние и т.д.
Var i,s:integer; st:string;
begin
st:='память';
s:=0;
for i:=1 to length(st) do s:=s+ord(st[i]);
writeln('s = ',s);
end.