Var a0, a1, a2, a3, a: longint;
Begin
readln(a3, a2, a1, a0);
a:=a3*1000+a2*100+a1*10+a0;
write(a)
End.
Пример:
1 5 9 8
1598
Если покрасить надо весь кабинет (потолок, пол и стены)
Если на Pascal:
var a, b, c, d, e, f, s: integer;
begin
readln(a);
readln(b);
readln(c);
readln(d);
s:=2*(a*b)+2*(a*c)+2*(b*c);
e:=s*d;
f:=5*e;
writeln(f);
end.
Если на Python:
import sys
a=int(sys.stdin.readline())
b=int(sys.stdin.readline())
c=int(sys.stdin.readline())
d=int(sys.stdin.readline())
s=2*(a*b)+2*(a*c)+2*(b*c)
e=s*d
f=5*e
print(f)
В 1 килобайте 1024 байта. В 1 мегабайте 1024 килобайта.
31мегабайт*1024=31744килобайт
31744*1024=32 505 856 байт
1 байт = 1 символ
32 505 856 символов
57) 256:32=8
58) не знаю
59) 450:150=3 бита