Подробное описание внутри файла. Программа на Паскале
D = C = 4;
C = B = 6;
B = A = 3;
переменная А значение не меняла.
Ответ: А = 3, В = 3, С = 6, D = 4.
10101+111=10212
10101-111=9990
10101*111=1121211
10101:111=91
Дано:
размер=25*30 см
разр. способн.=300*300 dpi
I=3 байт=24 бит
Найти:
V - ?
Решение:
V=K*I
1 дюйм = 2.54 см
25*2.54=9.8 дюймов
30*2.54=11.8 дюймов
K=9.8*11.8*300*300=10 407 600
V=10 407 600*24=249 782 400 бит : 8=31 222 800 байт : 1024≈30 491 Кб : 1024≈29.8 Мб
Ответ: 29.8 Мб
Var a,b,a1,b1:real;
begin
readln(a,b);
if a = b then writeln('Числа равны')
else
if a>b then begin
a1:=2*a*b; b1:=(a+b)/2;
a:=a1;b:=b1;
writeln('a = ',a,' b = ',b)
end
else begin
b1:=2*a*b; a1:=(a+b)/2;
a:=a1;b:=b1;
writeln('a = ',a,' b = ',b);
end;
end.