Решите на паскале. дано пятизначное число, если первая цифра больше последней то найти произведение 2-й и 4-й цифр, иначе поменять местами 3-ю и 5-ю цифры местами.
MrHezbollah
2
18.04.2019 15:51
7
Другие вопросы по теме Информатика
Jastmine42
22.01.2022 07:00
maroreya
20.05.2020 15:54
frazka228
27.08.2019 23:50
EmiliKotik123
22.04.2019 14:20
Артеммашар
20.06.2019 11:30
GoG353
20.06.2019 11:30
natusikfire
18.09.2020 23:58
m1a2c3s4i5m6a7
18.09.2020 23:58
Популярные вопросы
- Как звали дядьку,которы был главным у тридцати трех богатырей?...
1 - Определить спряжения: сиять, сверкать, бросать, кидать, громыхать, грохотать,...
3 - Аргументы на тему лишние знания вовсе не лишние...
3 - Первая бригада работала 25 часов,а вторая 33 часа.за это время первая бригада...
1 - Какие реформы провел перикл? какая часть населения афин не принимала участия...
3 - Как ты думаешь какое положительное и какое отрицательное влияние оказали...
1 - Из ружья массой 4 кг при выстреле вылетает пуля со скоростью 600 м/с. при...
1 - Вкаких трёх странах мира развиты почти все отрасли машиностроения?...
2 - Расстояние между двумя поезд преодолел за 7 часов а машина за 3 найти скорость...
3 - Твір на тему *мовою можна і оскверити, можна і возвеличати*...
2
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.