8(2^3) символов => каждый символ весит 3 бита
3б*120 = 360 Бит
print("Ноль в качестве знака операции завершит работу программы")
while True:
s = input("Знак (+,-,*,/): ")
if s == '0': break
if s in ('+','-','*','/'):
x = float(input("x="))
y = float(input("y="))
if s == '+':
print("%.2f" % (x+y))
elif s == '-':
print("%.2f" % (x-y))
elif s == '*':
print("%.2f" % (x*y))
elif s == '/':
if y != 0:
print("%.2f" % (x/y))
else:
print("Деление на ноль!")
else:
print("Неверный знак операции!")
VAR
x, y, xmin, xmax, dx : Real;
BEGIN
Writeln('Табулирование функции.');
xmin := -3; xmax := 2; dx := 0.5; x := xmin;
WHILE x<=xmax DO
begin
y := abs(2-sqr(x))+1;
Writeln(x:6:3, y:6:3);
x := x+dx;
end {while};
Readln
END.
Var
i,n:integer;
a:array[1..4] of integer;
begin
Write('n='); Read(n);
for i:=1 to 4 do begin
a[5-i]:=n mod 10;
n:=n div 10
end;
Writeln(a[4]*1000+a[3]*100+a[2]*10+a[1]);
Writeln(a[3]*1000+a[4]*100+a[1]*10+a[2]);
Writeln(a[2]*1000+a[1]*100+a[4]*10+a[3]);
Writeln(a[1]*1000+a[3]*100+a[2]*10+a[4])
end.
Пример
n=7048
8407
4870
784
7408