Напишите программы на PascalABC - вопрос №15582278 от айрат36 04.06.2021 12:07

Question

Информатика: Напишите программы на PascalABC

айрат36 · Answer

PascalABC.NET                                           Задание 1:### Введите два числа X и Y: .Pr;var (X, Y) := RI2;var minXY := min(X, Y);if X = minXY then X := 0;if Y = minXY then Y := 0;$ Результат: {X} {Y} .PrЗадание 2:### Введите a и b: .Pr;var (a, b) := RI2; Введите три числа: .Pr;$ Результат: {RAI(3).Wh(x → x in a..b).Str} .Pr...