Дано число, удвоить его в 3 раза если оно кратно 17. - вопрос №31748490232 от Даня1681 28.02.2022 17:40

Question

Информатика: Дано число, удвоить его в 3 раза если оно кратно 17. в противном случае уменьшить на 4. вывести ответ на экран. в pascal abc

Даня1681 · Answer

Var a:real;beginread(a);if a mod 17 = 0 then beginwrite(a*2*3);end;else beginwrite(a-4);end;end....