Дано три дійсних числа a, b, c. Якщо a-b>с, кожне число
збільшується вдвічі, інакше Кожне число зменшується на
одиню. Розробіть програму реалізації цього завдання.
martyanovvanya1
1
15.12.2020 02:12
22
Другие вопросы по теме Информатика
Валерия3365
26.02.2021 01:25
MaryGaloyan
19.03.2021 14:53
Quickpool
19.03.2021 14:49
dvortrans
12.05.2020 12:53
Ооооооокккккккк
12.05.2020 12:53
m1kaS7ark
12.05.2020 12:53
Анжела200011
02.03.2020 13:39
wranase
02.03.2020 13:41
sapro95
11.09.2019 20:11
тетрадка535243
11.09.2019 20:11
Популярные вопросы
- Как писатель В. Распутин объяснил значение слова экологии? 2. Как ты понимаешь...
2 - Как называлось племя варваров, напавшее с севера на Рим в 390 г. до н.э.?...
2 - 6. Выполни орфографическую подготовку. Объясни написаниеСлов.отм...чают,...
3 - ответить на во Что значил роман Мастер и Маргарита в жизни М.А. Булгакова?...
1 - Каковы особенности эпохи Нужно писать краткое...
3 - Жиындарга кара. оларга атау бер. еки жиын элементтер ортак касиеттерин...
2 - Перемножь: (b+1)(−a+2) . a+ab+2b+2 −a+2+2b−ab −2−2b+ab+a −a−ab−2b−2...
2 - Назовите средство художественной изобразительности которым пользуется...
3 - решить задачу с условием. ЗАРАНЕЕ...
3 - Төмендегі мысалдарды салаларга бөліп жазыңдар:дүкен,театр,банк,мектеп,санаторий,қарттар...
1
var a,b,c:integer;
begin
read(a,b,c);
if a-b > c then begin
a:=a*2;
b:=b*2;
c:=c*2
end
else
begin
dec(a,1);
dec(b,1);
dec(c,1);
end;
writeln(a,' ',b,' ',c);
end.
*dec функция уменьшающая число n на i