Компьютер- это устройство для обработки и хранения информации, в 20 веке изобрели.
a = float(input('a = '))
c = input()
b = float(input('b = '))
if c == "-" :
////print (a-b)
elif c == "/" :
////if c != "0" :
////////print (a/b)
////else :
////////print("Деление на ноль!")
elif c == "*":
////print(a*b)
elif c == "mod":
////print (a % b)
elif c == "pow":
////print(a ** b)
elif c == "div":
////print(a // b)
elif c == "+":
////print(a+b)
все '/' ето 1 пробел
<span>АНКЛАН, в переводе с чукотского - это просто "люди", а пасти оленей в тундру - чауча "люди, у которых есть олени" (отсюда и пошло название чукча) .</span>
Uses GraphABC;
begin
LockDrawing;
for var i:=1 to 800 do
begin
Window.Clear;
Brush.Color := clGray;
FillRectangle(i+10,90,i-110,430);
Brush.Color := clRed;
Ellipse(i,100,i-100,200);
Brush.Color := clYellow;
Ellipse(i,210,i-100,310);
Brush.Color := clGreen;
Ellipse(i,320,i-100,420);
Redraw;
Sleep(1);
end;
for var i:=1 to 900 do
begin
Window.Clear;
Brush.Color := clBlack;
Ellipse(i,100,i-200,300);
Brush.Color := clWhite;
Ellipse(i-1,101,i-199,299);
Brush.Color := clRed;
Ellipse(i-20,120,i-180,280);
Brush.Color := clWhite;
FillRectangle(i-50,180,i-150,220);
Redraw;
Sleep(1);
end;
end.
<span>Миллиметр ртутного столба</span>
