Ввести число если оно четное кратное 7 и не кратное - вопрос №382628275 от MrGowno 22.11.2021 20:34

Question

Информатика: Ввести число если оно четное кратное 7 и не кратное 5 то увеличить его на 6

MrGowno · Answer

Var a:integer;BeginRead(a);If (a mod 2=0) and (a mod 7=0) and ( a mod 5 0) thena:=a+6;Write(a);End....