Питон. напишите программу, которая моделирует работу следующего автомата. автомат
получает на вход четырёхзначное число затем вычисляются три суммы: сумма первых двух
шифр, сумма средних цифр и сумма последних двух цифр. результат работы автомата -
произведение этих сумм.​

ответ:

def process_input(number):

numlist = list(number)

first_part = int(numlist[0])+int(numlist[1])

center_part = int(numlist[1])+int(numlist[2])

last_part = int(numlist[2])+int(numlist[3])

return first_part*center_part*last_part

def main():

input_number = input()

assert len(input_number) == 4

result = process_input(input_number)

print(result)

if __name__ == '__main__':

main()

объяснение:

p.s для восстановления нормального состояния программы предоставлен её скриншот. сайт напрочь ломает python-код.

50зн=50байт

60зн=60байт

1кбайт= 1024байта

1мб=1024кбайта

=> 1мбайт=(1024*1024)байт

1мбайт=1048576 байт

50байт/1048576байт=0,0000476837мбайт

60байт/1048576байт=0,0000572205мбайт 

1

a)

program pr;

var

s: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

writeln('введите заданный символ');

readln (c);

for i: =1 to length(s) do if s[i]=c then writeln ('в строке найден заданный символ');

readln;

end.

б)

program pr;

var

s,n: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

writeln(n);

readln;

end.

в)

program pr;

var

s,n,f: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

f: =copy(s,i+1,length(s)-i+1);

writeln(n);

writeln(f);

readln;

end.

program pr;

var s: string;

begin

s: ='касіу ясь канюшыну';

delete (s,7,3);

insert ('ясь',s,7);

writeln (s);

readln;

end.

3

а)

program pr;

var

s: string;

begin

s: ='реки горы и болота';

delete (s,6,5); {удаляем включая пробел}

writeln (s);

readln;

end.

б)

program pr;

var

s: string;

begin

s: ='реки горы и болота';

delete(s,13,6);

s: =s+'озера';

writeln (s);

readln;

end.