Есть ответ 👍

Найти сумму цифр x*y+z*f числа xyzf пример работы программы : ввод 1234 вывод 14

242
444
Посмотреть ответы 3

Ответы на вопрос:


var a: integer;

begin

  readln( a );

  write( (a div 1000) * ((a div 100) mod 10) + ((a div 10) mod 10) * (a mod 10) );

end.

пояснение:

a - 4-значное число, тогда:

a div 1000 - первая цифра числа.

(a div 100) mod 10 - вторая цифра числа.

(a div 10) mod 10 - третья цифра числа.

a mod 10 - четвёртая цифра числа.

ум5789
4,5(85 оценок)

var a: integer;

begin

read (a);

write ((a div 1000) * (a div 100 mod 10) + (a mod 100 div 10) * (a mod 10))

end.


Думаю так или все-таки нет ?

Популярно: Информатика