Написать программу в паскаль abc составить алгоритм нахождения меньшего из 2-х значений определить,является ли данное число чётным или нечётным

174

176

Посмотреть ответы 2

Ответы на вопрос:

Masha11781

Информатика

4,8(74 оценок)

Program m; var a,b,c: integer; begin readln(a,b); if a< b then c: =a else c: =b; if c mod 2 =0 then writeln ('наименьшее число = ',c , '; данное число чётное') else writeln ('наименьшее число = ',c , '; данное число нечётное'); end.