ответ:
program arraycalc;
var
ar: array[1..4, 1..4] of integer;
function neg (row: integer): integer;
var
i: integer;
begin
result : = 0;
for i : = 1 to 4 do
if ar [row, i] < = 0 then
inc (result);
end;
var
i, j, imax, n, nmax: byte;
f: text;
begin
assign(f, 'mas.txt');
rewrite (f);
randomize;
for i : = 1 to 4 do begin
for j : = 1 to 4 do begin
ar[i, j] : = random (200) - 100;
write (inttostr (ar [i, j]) : 4);
write (f, inttostr (ar [i, j]) : 4);
end;
writeln (f, '');
writeln;
end;
close (f);
imax : = 1;
nmax : = 0;
for i : = 1 to 4 do begin
n : = neg (i);
if n > nmax then begin
nmax : = n;
imax : = i
end;
end;
writeln;
writeln ('строка массива: ');
for j : = 1 to 4 do
write (ar [imax, j] : 4);
readln;
end.
Население Тринидада и Тобаго весьма разнообразно по своему составу, что отражает историю развития страны. По оценкам на июль 2008 года численность населения государства составляла 1 231 323 человек.
Рост численности населения Тринидада и Тобаго во второй половине XX века
Первоначально острова были заселены индейцами. После начала колонизации индейцы были постепенно истреблены и ассимилированы европейскими поселенцами.
В течение трёх веков испанского владычества над Тринидадом остров заселялся очень медленно. В 1783 году население Тринидада составляло лишь около 2,8 тысяч человек, из них всего 126 европейцев. Именно в этот год Испания объявила выгодные условия для приобретения земли на острове для католиков. Это привело к тому, что за последующие 14 лет в колонию с других островов Вест-Индии переселилось большое количество французских плантаторов с рабами. Когда в 1797 году колония попала под власть британцев, население составляло уже около 20 000 человек (из них 2 000 европейцев). С 1830-х годов после отмены рабства на британских Карибских островах на Тринидад попадает большое количество рабочих из Индии.
Поделитесь своими знаниями, ответьте на вопрос:
Товар стоит a руб. b коп. за него заплатили c руб. d коп. сколько сдачи требуется получить? вводятся 4 числа: a, b, c и d. необходимо вывести 2 числа: e и f, число рублей и копеек, соответственно. примеры входные данные выходные данные 2 1 3 21 12 1 4 01 99эту можно решать и при одних арифметических операций, не используя инструкцию if.