a = 3, b = 2
b = 9 + a · b = 9 + 3 · 2 = 9 + 6 = 15
a = b / 5 · a = 15 / 5 · 3 = 3 · 3 = 9
<h2>Ответ</h2>
9
<h2>1.</h2>
program raf105;
var a:array[1..3,1..3] of integer;
i,j,x:integer;
begin
writeln('Введите 9 чисел по очереди');
x:= 1;
for i:=1 to 3 do
for j:=1 to 3 do
begin
readln(a[i,j]);
if (a[i,j] < 0) and (a[i,j] > -14)
then x *= a[i,j];
end;
writeln('Вывод: ',x);
end.
<h2>2.</h2>
program raf105;
var a:array[1..10] of integer;
n,i,x:integer;
begin
writeln('Вводите 10 чисел по очереди: ');
x:= 1;
for i:=1 to 10 do
begin
readln(a[i]);
if ((a[i] mod 5) = 0) and (a[i] <> 0)
then x *= a[i];
end;
writeln('Введите число от 1 до 10');
readln(n);
a[n] := x;
writeln(n,'-й элемент массива заменён на число ',x);
for i:=1 to 10 do
writeln(a[i]);
end.
<em><u>Язык PascalABC</u></em>
<span>Нужно определить, сколько времени будет передаваться файл объемом 5 Мбайт по каналу со скоростью передачи данные 2</span>15<span> бит/с; к этому времени нужно добавить задержку файла у Толи (пока он не получит 512 Кбайт данных по каналу со скоростью 2</span>19<span> бит/с). </span>
<span>Периведём объём информации в Мб в биты: Q = 5 Мб = 5 * 2</span>20<span> байт = 5 * 2</span>23<span> бит. </span>
<span>Время задержки: </span><span> = 512 кб / 2</span>19<span> бит/с = 2</span>(9 + 10 + 3) - 19<span> c = 2</span>3<span> c. </span>
<span>Время скчивания данных Мишей: </span><span> = 5 * 2</span>23<span> бит / 2</span>15<span> бит/с = 5 * 2</span>8<span> c. </span>
<span>Полное время: </span><span> = 5 * 2</span>8<span> c + 2</span>3<span> c = (256 * 5 + 8) c = 1288 c. </span>
<span>Ответ: 1288.</span>
что то мне подсказывает что для разгона надо брать память с радиаторами и не перегревать а все остальное на нормальных плашках все будет ок
#include <bits/stdc++.h>
using namespace std;
int main() {
int x, y;
cin >> x;
while (true) {
cin >> y;
if (y == -1) break;
if (y >= x) {
cout << "NO" << endl;
return 0;
}
x = y;
}
cout << "YES" << endl;
return 0;
}
