Нарисуйте блок-схему! программу прикладываю. в кафе мороженое по 3 шарика и по 5 шариков. можно ли купить k шариков мороженого? program icecream; var k: integer; begin readln(k); if ((k=3) or (k=5) or (k=6) or (k> 7)) then writeln ('yes') else writeln ('no'); end.
Но сама программа не очень.