Написать в pascal. даны два числа, если второе число отрицательное, необходимо уменьшить первое число в 5 раз, иначе числа оставить без изменения
haikyuu24
3
02.06.2019 01:50
1
Другие вопросы по теме Информатика
kriss200900
03.09.2019 21:10
olykharkov
03.09.2019 21:10
garaaj
03.11.2020 11:07
MaxSorv
03.11.2020 11:07
millkawow
21.01.2022 17:47
GarryPotter15
21.01.2022 17:30
vanikkuz
04.03.2021 14:43
книга67
30.06.2019 20:50
Популярные вопросы
- Назовите царства живой природы и подцарства животных....
2 - Морфологический разбор слов: свито, покрыто. : з...
2 - Саукциона были проданы подсвечники и вазы на общую сумму 247500р. определите,...
1 - Значение и происхождение фразеологизма не отдать ни пяди земли...
1 - Сочинение про масленицу 10 предложений...
3 - Переведите на язык на данный момент компьютер имеет важную роль в жизни каждого...
2 - Предположим, что вес золотой короны царя гиерона в воздухе 20н, а в воде -18,75н...
1 - Придумать 5 примеров с обособлением дополнения, и 2 без ! !...
1 - Слово не стрела, а хуже стрелыслово не стрела, а хуже стрелы разит.не ножа...
2 - Произведение замени кубом множителя: 5×5×5; 18×18×18; 9×8×9; 20×20×20; 12×12×12;...
1
begin
readln(a,b);
if (abs(a)>b) or (b<0) then
begin
a:=a/5;
writeln(a,' ',b)
end
else
writeln(a,' ',b);
end.