<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
for var i:=0 to a.IndexMin-1 do a[i]:=0; a.Println;
end.
<u>Пример</u>
n= 13
-10 44 17 13 50 49 -7 -46 -36 14 35 42 26
0 0 0 0 0 0 0 -46 -36 14 35 42 26
Program n1;
var a: integer;
begin
readln(a);
writeln(a+1);
writeln(2*a);
writeln(a*a);
writeln(a*a*a);
writeln(sqrt(a));
end.
1. Календарная дата 13.01.1963
2. Код товара (артикул) в торговой сети
3. Расстояние на земной поверхности, выраженное в метрах.
1) 3 учителя (во 2 строке у 3-х классов уроки)
2) Например, если классы параллелей (10А и 10Б, 9А и 9Б, 11А и 11Б) ставить вместе
3) I don't know
4) Если Иванову дать 9-ые классы, Петрову - 10-ые, а Сидорову - 11-ые =)