Дано число, удвоить его в 3 раза если оно кратно - вопрос №8490007317 от Ejdkw 15.11.2022 20:02

Question

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

Ejdkw · Answer

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