Решите на паскале. дано пятизначное число, если - вопрос №1216284 от elya144 20.06.2020 04:07

Question

Информатика: Решите на паскале. дано пятизначное число, если первая цифра больше последней то найти произведение 2-й и 4-й цифр, иначе поменять местами 3-ю и 5-ю цифры местами.

elya144 · Answer

var   a:integer;begin   readln(a);   if ((a div 10000) (a mod 10)) then      writeln(((a div 1000) mod 10) * ((a mod 100) div 10))  else writeln(((a div 100) mod 10) * (a mod 10));end....