Дано целое четырехзначное число если первая цифра большечем последняя то увеличте в 2 раза иначе в 10 раз . написать программу в паскаль
vnigmatullina
2
10.07.2019 07:40
1
Другие вопросы по теме Информатика
ketrin0309
04.08.2019 17:20
778392
04.08.2019 17:20
stasgura
02.12.2020 12:50
sertarsertar205
02.12.2020 12:50
beatsdol
02.12.2020 12:50
irynasherem02
25.01.2021 13:28
NekitKrut2007
04.08.2019 07:00
savaam1
04.08.2019 07:10
кккк50овд
22.06.2019 20:40
Популярные вопросы
- Задание ответить на вопросы 1. Какие племена входили в состав сарматских...
3 - сделать решение этого примера с действиями даю 100 б!...
1 - В парке 3800 деревьев, 40% всех деревьев тополя, 15% - остальные деревья...
1 - Область допустимых решений задачи линейного программирования не может...
2 - даны точки А(0,1,-1); В(2,-1,-3). Найдите координаты точки М, принадлежащей...
2 - What do they like doing at the seaside?Look,read and underline....
1 - , просто решение (без пояснений) и ответ...
1 - Жансая мен Бексұлтан айтысы «Қазіргі айтыс: кезендік ерекшеліктер»тақырыбына...
2 - Ани таблицу СеверноеполушариеКожноеполушардекабрьянварь,ионь, иавгустее...
2 - Апамның астауы склоняем принадлежные окончания...
3
Begin
Readln(A);
If (A div 10000 > (A mod 10) then A:=A*2 else A:=A*10;
Writeln(A);
end.