ДАЮ 100 БАЛЛОВ!
Помогите перевести с паскаля на питон:
var a,b,i:integer;N:string;
begin
read(N);
for i:=1 to length(N) do
begin
if N[i]='2' then a:=a+2 else b:=b+3;
end;
write(a-b);
end.
Самые новые вопросы
Информация
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.