Использовать Робот
алг
нач
нц пока справа свободно
вправо
закрасить
кц
нц пока снизу свободно
вниз
закрасить
кц
нц пока слева свободно
влево
закрасить
кц
нц пока сверху свободно
вверх
закрасить
кц
кон
В программе подсчитывается количество двухзначных чисел, которые делятся на 7 без остатка (14, 21, ... , 98)
program raf105;
var
i,n: integer;
begin
write('Введите число: ');
readln(n);
write('Чётные: ');
for i:=1 to n do
if i mod 2 = 0
then write(i,' ');
writeln;
write('Нечётные: ');
for i:=1 to n do
if i mod 2 <> 0
then write(i,' ');
end.
<h3><u>PascalABC 3.4.2</u></h3>
Для начала узнаем сколько символов в тексте 60*40*157=376800
Так как кодировка 64 битная каждий символ весит 64 бита 376800*64=24115200 бит
Переведём Биты в Байты 24115200/8=3014400
Теперь переведём Байты в Килобайты 3014400/1024=2943Килобайт и 768 байт
Переведём Килобайты в мегабайты 2943/1024=2 Мегабайта и 895 Килобайтов
Ответ: 2Мг 895Кб 768 байт в дробах выглядит так 2,874755859375
напиши про разные клавиатуры для компа!!) в интернете оч много интересных фотографий. клавы и прозрачные, и в форме скелета, и гнущиеся, и всякоразные в общем) материала предостаточно, дерзай