1. Даны два числа. Если оба кратны 3, то первое уменьшить в два раза. Free Pascal

Question

40

в избранное ссылка

Знаете ответ?

eoleol · Accepted Answer

98

eoleol

27 августа 2022

Var a,b: real; beginreadln (a,b); If (a mod 3=0) and (b mod 3=0) then a: =a/2; writeln (a); end.

комментировать

в избранное ссылка отблагодарить