Если в первый день машинист проехал 10 км, то во второй день он проехал на 5 км больше
сколько км проехал машинист за два дня?
10 + 5 = 15 (второй день)
15 + 10 = 25 (проехал за два дн
Заявленная емкость неформатированного гибкого магнитного диска формата 3,5" составляет 1,44 Мбайт.Рассчитаем общую информационную емкость отформатированного гибкого диска:Количество секторов: N = 18 х 80 х 2 = 2880.Информационная емкость:512 байт х N = 1 474 560 байт = 1 440 Кбайт = 1,40625 Мбайт.Однако для записи данных доступно только 2847 секторов, то есть информационная емкость, доступная для записи данных, составляет:512 байт х 2847 = 1 457 664 байт = 1423,5 Кбайт= 1,39 Мбайт.
1) с
2) корневой каталог - С:
каталог первого уровня - windows
каталог второго уровня - appcompat
каталог третьего уровня - appraiser
3) b
1) -
2) 20 18 14 8 0 -10 -22 -36 -52 -70
3) 4
код полностью
var
a: array[1..10] of integer;
i, k: integer;
begin
for i := 1 to 10 do
begin
a[i] := 20 - i * (i - 1);
write(a[i], ' ');
end;
writeln;
K := 0;
for i := 1 to 10 do
if a[i] > i then k := k + 1;
Write(k);
writeln;
end.
//PascalABC.NET версия 3.2, сборка 1417
//Если программа не запускается, то обновите версию
begin
var n := 2003;
var m := 2016;
var a := MatrGen(n, m, (i, j)-> i + 1 + n * j);
var b := MatrGen(n, m, (i, j)-> j + 1 + m * i);
var k := 0;
for var i := a.GetLowerBound(0) to a.GetUpperBound(0) do
for var j := a.GetLowerBound(1) to a.GetUpperBound(1) do
if a[i, j] = b[i, j] then begin
k += 1;
Println(i + 1, j + 1, a[i, j]);
end;
// a.Println();
// writeln;
// b.Println();
writeln(k);
end.
Вывод
1 1 1
156 155 310620
311 309 621239
466 463 931858
621 617 1242477
776 771 1553096
931 925 1863715
1086 1079 2174334
1241 1233 2484953
1396 1387 2795572
1551 1541 3106191
1706 1695 3416810
1861 1849 3727429
2016 2003 4038048
14
Ответ 14