Всего 3 партии: второй: 14; первый: 24. 1) Второй в третьей партии проиграл половину, следовательно 14 - это половина того , что у него было; значит первый в третьей партии выиграл 14, следовательно у него было на 14 меньше. Итоги второй партии: второй: 14*2=24; первый: 24-14=10. 2) Первый во второй партии проиграл половину , следовательно 10 - это половина того, что у него было; значит второй во второй партии выиграл 10, следовательно у него было на 10 меньше. Итого первой партии: второй: 28-10=18; первый: 10*2=20. 3) Второй в первой партии проиграл половину, следовательно 18- это половина того, что у него было; значит первый в первой партии выиграл 18, следовательно у него было на 18 меньше. Итоги до начала игры: второй: 18*2=36; первый: 20-18=2. ответ : 2 монеты было у первого пирата до начала игры. Проверка: второй: (36:2+10):2=14; первый: (2+18):2+14=24.
program z1; const n = 3; m =3; var a:array[1..n, 1..m] of integer; i,j,min:integer; begin //Заполним матрицу и найдем минимальное min:=20; for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(41)-20; if a[i,j] < min then min:=a[i,j]; write(a[i,j]:4); end; writeln; end; writeln; // меняем минимальное на 0 и выводим матрицу for i:=1 to n do begin for j:=1 to m do begin if a[i,j] = min then a[i,j]:=0; write(a[i,j]:4); end; writeln; end; end.
Тестовое решение для 1 задачи: 18 20 -10 19 -14 -17 -4 -17 -15
18 20 -10 19 -14 0 -4 0 -15
Задание №2
program z2; const n = 3; m =5; var a:array[1..n, 1..m] of integer; i,j,min:integer; begin //Заполним матрицу for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(41)-20; write(a[i,j]:5); end; writeln; end; writeln; // меняем все элементы на их квадраты и выводим матрицу for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=sqr(a[i,j]); write(a[i,j]:5); end; writeln; end; end.
Тестовое решение для задания №2 15 8 18 -17 10 -19 17 1 20 -15 -20 -13 -11 -3 17
запишем условие: I1=447.6Kб, I2=1.8Мб N-?
решение: выразим объем дискеты в Кб
1,8*1024=1843,2 Кб
N=I2/I1=1842.2/447.6=4.1179 (округлим до 4) это и есть ответ