program number7;
uses crt;
var A: integer;
begin
clrscr;
A:=(116 div 10)*(116 mod 15) div 2 +116 mod 6;
writeln('a=',A);
end.
a=62, div 10 - делит число на 10 и выделяет целую часть, mod 15 - делит число на 15 и выделяет остаток от деления , div 2 - делит число на 2 и выделяет целую часть, mod 6 - делит число на 6 и выделяет остаток
1.1. Ответ: 2) 4 раза
1.2. Ответ: 100 Бит
1.3. Ответ: 800 Бит
1.4. Размер переводим в дюймы 10/2,54=3,937 Дюйма
Высчитываем размер края в пикселях 1200*3,937=4724 (пикселей) до круглого значения в меньшую сторону.
K = 4724*4724 = 22316176 пикселей всего на изображении
I = 24 бита на пиксель
(Бит)
535588224/8=66 948 528 (Байт) = 63,85 (МБайт)
For i = 1 To 9
For j = 1 To 9
s$=String(i*j)
if length(s$)=1 then s$=" "+s$ else if length(s$)=2 then s$=" "+s$
Print s$;
Next j
Print
Next i
End
Результат работы программы:
1 2 3 4 5 6 7 8 9
2 4 6 8 10 12 14 16 18
3 6 9 12 15 18 21 24 27
4 8 12 16 20 24 28 32 36
5 10 15 20 25 30 35 40 45
6 12 18 24 30 36 42 48 54
7 14 21 28 35 42 49 56 63
8 16 24 32 40 48 56 64 72
9 18 27 36 45 54 63 72 81
Замечание: таблица на самом деле ровная, это тут ширина пробела и ширина цифры различна, поэтому сдвиг.
1-первое больше(но не уверен) 2-320сек 3-6400мб/сек. Дождись другие ответы, так как я не уверен)
1 бусинка самая маленькая 2 больше 3 больше 1,2 4 больше 1,2,3 а 5 больше 1,2,3,4. А 6 может быть равна любой из 1;2;3;4;5.