ВВ Вархуил Вархуилов PASCAL: Помогите составить программу, в которой переменная вычисляется по a+2b, если A нечетное, и 3ab, если A четное...
АС Анастасия Соболевская uses crt; var a,b: integer; begin readln(a,b); if a mod 2 = 0 then writeln(3*a*b) else writeln(a+2*b); end.