1. Включаем калькулятор
2. Нажимаем "Вид" -> "Программист"
3. Нажимаем "Hex" -> пишем "FE" -> нажимаем "Dec"
Получается 254!
var a:array[1..10] of integer;
i,s:integer;
Begin
randomize;
for i:= 1 to 10 do begin
a[i]:= random(100);
s:=s+a[i];
end;
writeln(s);
End.
var a:array[1..10] of integer;
i,mk,pk,s,p:integer;
Begin
randomize;
p:=1;
for i:= 1 to 10 do begin
a[i]:= random(30+10)-10;
if a[i]>=0 then begin
pk:=pk+1;
s:=s+a[i];
end
else begin
mk:=mk+1;
p:=p*a[i];
end;
end;
writeln(pk,s,mk,p);
End.
1 байт = 1 символ стандарт
25 стр * 28 симв * 1 байт симв = 700 байт вес
Они злоумышленники. Их цель навредить человеку или какой нибудь компании,нанеся им материальные убытки в виде поломанной техники или обесценивания товара
===== PascalABC.NET =====
procedure SumP(a: array[,] of integer; p: integer; var s: integer);
begin
s := a.Row(p-1).Sum
end;
begin
var m := MatrRandom(11, 4, 24, 32);
m.Println(3);
var s5, s10: integer;
SumP(m, 5, s5);
SumP(m, 10, s10);
Println('Учеников:', s5 + s10)
end.