через 3 пары:
1. Перенесли назад Т, осталось Амара, а убрали, осталось Мара
2. Перенесли назад М, осталось Ара, а убрали, осталось Ра
3. Перенесли назад Р, осталось А, а убрали , ничего не осталось
Да, тут уже до меня решили правильно, а я про согласные, которые переносили в конец слова, не писала, тк там А не было.
Var
n, cnt: integer;
begin
write('Введите число: ');
read(n);
repeat
inc(cnt);
n := n div 10;
until n = 0;
writeln('Количество цифр в числе: ', cnt);
end.
1 - мышь
2 - монитор
3 - пиксель
4 - произведение количества строк изображения на количество точек в строке
5 - красного, синего, зелёного
6 - битов, которые используются для кодирования цвета одного пикселя
7 - вывода графической информации на экран монитора
8 - текст письма
9 - программа для создания и редактирования рисунков
10 - вот тут как раз сложно ответить, исходя из данных вариантов.
чёткие и ясные контуры - это скорее векторные, но при хорошем разрешении и растровые тоже
небольшой размер файлов - это зависит от сжатия, при сжатии может теряться качество
точность цветопередачи - если имеется ввиду частая смена цветов без четкой структуры, то это достоинство растровых
при этом совершенно нельзя сказать, что векторная графика неточно передает цвета, там просто меньше перемен цвета
возможность масштабирования без потери качества - это как раз плюс векторной графики
<span>var
i, k: real;
num:array[1..100] of integer;
begin
for: i := 1 to 99 do
num[i] := i;
k := 0;
i := 1;
while k < 7 do
begin
if easy(num[i])
then
k := k + 1;
i := i + 2;
end;
write(num[i-2]);
end.
Немного разобрал бред, но программа бессмысленная и проверка(if </span>easy(num[i])) мне не понятна, что это за процедура easy?
Что за массив без его описания, автор разберись с кодом, поучи синтаксис Паскаля.
Нужно 64 умножить на 128 и опять умножить на. 256= х байт дальше разберетесь сами