написать программу,которая определяет чей модуль из двух чисел больше. в паскале с помощью процедуры.

  • 28-01-2007 23:37
  • Просмотры: 65
Ответы ( 1 )
Veronika Marcypan
+1
29-01-2007 00:47

//Pascal ABC.NET 3.1 сборка 1219 Var a,b:integer; procedure some(a,b:integer); begin if abs(a)>abs(b) then writeln(a) else writeln(b); end; begin read(a,b); some(a,b); end. Пример ввода: -22 1 Пример вывода: -22