Ввести число если оно четное кратное 7 и не кратное - вопрос №382628275 от ррррррррор1 10.05.2022 08:03

Question

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

ррррррррор1 · 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....