Var x,y,a,b:integer;
begin
write('x, y:');
readln(x,y);
if (x>0)and(y>0) then
begin
a:=x; b:=y;
while a<>b do
if a>b then a:=a-b else b:=b-a;
writeln('НОД(',x,',',y,') = ',a);
end
else writeln('Ошибка ввода');
end.

Пример:
<span>x, y:
50 125
НОД(50,125) = 25</span>

0 0

3 года назад

Рассчитайте объём видеопамяти (в Мб), необходимой для хранения графического изображения, занимающего весь экран монитора с разре

Чингиз моё имя [49]

16 777 216 = это 2 в 24-й степени, значит каждый пиксель занимает 24 бит, то есть 3 байта
1280 x 720 = 921600 пикселей в изображении
921600 x 3 = 2764800 байтов занимает изображение
2764800/1024/1024 ≈ 2,64 Мегабайт памяти занимает изображение

0 0

4 года назад

Твёрдый знак в русском языке может встречаться только перед буквами е,ё,ю и я . сколько битов содержит информация о двух буквах

Ic6Nood

Конечно же вариант г) 4

0 0

3 года назад

Что такое передача ?????

Волянская [4]

Передача это какой то или какие то файл(ы) ты куда то перекидываешь:)

0 0

4 года назад

Прочитать ещё 2 ответа