На языке паскаль . задано 3 числа проверить идут они по возростанию по убыванию или произвольно. задано 2 числа найти их произведение.
vovbakum
2
19.05.2019 04:20
1
Другие вопросы по теме Информатика
Nicoleta23
22.12.2019 19:45
MarGGoTV
22.12.2019 19:45
Pipidastet
22.12.2019 21:30
Egor190606
22.12.2019 21:26
alenabarsukova20
22.12.2019 21:26
Kiri205
14.06.2019 22:40
киса822
14.06.2019 22:40
korolevalena20
14.06.2019 22:40
Semev
13.07.2019 16:10
Популярные вопросы
- 3предложения с вводными словами из газеты нужно выписать...
1 - Чиї інтереси захищала золота булла карла 4?...
1 - Кубик из кальция ,ребро которого имеет длину 1 сантиметр,растворили...
2 - 8.природная зона: растения: 1.тундра а) пихта 2. широколиственные леса...
3 - Оставьте 5 сложных предложений с прилагательными образованных от суффиксов...
2 - Полная банка с водой весит 5 кг , а такая же банка , наполненная наполовину,...
3 - Какие сходства и различия есть у степи и саванны?...
3 - Кто писал по биологии эссе на тему: весенние изменения в природе , 6...
1 - Об этой системе упоминали ещё гиппократ и аристотель, а одна из её частей...
2 - 1. пекарня выпекает по 150кг хлеба.за сколько дней она испечет 450 кг...
3
1)
var
a,b,c:integer;
begin
readln (a,b,c);
if (a>b) and (b>c) then writeln ('Числа стоят по убыванию ');
if (a<b) and (b<c) then writeln (' Числа стоят по возрастанию');
end.
2)
var
a,b:integer;
begin
readln (a,b);
writeln (a*b);
end.