1) Узнаем сколько фото:
600 Мбайт = 600 000 Кбайт.
600 000 / 500 = 1 200 (фото)
2) Узнаем сколько нужно времени:
1 фото = 6 (сек).
1 200 * 6 = 7 200 (сек) = 120 (мин) = 2 (ч)
Ответ: 2 часа.
Если B = просто 326, тогда ответ 3 является верным!
Program ideone;
var xPos, {В данной переменной храним позицию по оси X} yPos {А в этой по оси Y} : real; {Переменные вещественного типа, что бы можно было вводить дробные значения} begin
Write('Enter x position: '); Readln(xPos); {Вводим переменную по X}
Write('Enter y position: '); Readln(yPos); {И по Y}
if (xPos <= 0) and (yPos <= 1) and (yPos >= -1) {Если переменная находится в пределах прямоугольной области, что слева от оси Oy} then begin Write('Point in area.'); {Тогда всё окей, мы попали в заштрихованную зону и выведем ответ} end else {если же не попали, проверим другую} begin if (xPos*xPos + yPos*yPos <= 1) {Проверяем по формуле графика окружности попадание в полукруг справа от оси Oy} then begin Write('Point in area.'); {Если попали, выведем об этом соответствующее сообщение} end else begin Write('Point out of area.'); {Если же не попали, то печаль беда, всё плохо, так и скажем} end endend.
Данным А1 А4 соотвествует круговая диограмма номер 2
Program test;
const n = 100;
var i,k:integer;
m: array[1..n] of integer;
begin
randomize;
for i:=1 to n do m[i]:=random(1,100);
for i:=1 to n do if m[i] mod 2 =0
then inc(k);
writeln('Количество четных чисел: ',k);
end.<span>
</span>