Составить программу, определяющую результат гадания на ромашке - любит - не любит , взяв за исходное

Question

Информатика: Составить программу, определяющую результат гадания на ромашке - любит - не любит , взяв за исходное данное кол-во лепестков n. pascal

akonbkaru · Answer

Varn:integer;BeginWrite( n = );ReadLn(n);if n mod 2 = 0 then WriteLn( Не любит )else WriteLn( Любит )End....

Составить программу, определяющую результат гадания на ромашке - "любит - не любит", взяв за исходное данное кол-во лепестков n. pascal