1. 1 байт, 1кб, 1мб, 3500кб, 78мб, 1гб
2. 205312 мб
4.N=2^i
N=17
N~2^5
вообще ближе по значению 2^4, однако лучше перебор, чем недобор.
i=5
Прости, не могу с остальным помочь
Var i, q, n : integer;
begin
read(q, n);
for i:=10 to 99 do
if ((i mod q = 0) and (i div 10 + i mod 10 = n)) then
write(i, ' ');
<span>end.</span>
Program plochad;var a,c:real;beginwriteln ('Введи длину стороны a=');readln (a);if a < 0 then writeln ('Число не может быть отрицательным! Введите другое число.');writeln ('Введи длину основания c=');readln (c);if c < 0 then writeln ('Число не может быть отрицательным! Введите другое число.');c:= a*c/2;if c<0 then write ('Невозможно решить') else writeln ('S=',c);end.