Дано число, удвоить его в 3 раза если оно кратно - вопрос №8490007317 от Арина200911 13.02.2021 13:42

Question

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

Арина200911 · Answer

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