Составить программу,определяющую результат гадания на ромашке "любит -не любит",взяв за исходное данное количество лепестков n.
Если четное, то не любит :(, если нечетное - то любит :).
var
n : integer;
begin
read (n);
if n mod 2 = 0 then writeln (':(') else writeln (':)');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Если четное, то не любит :(, если нечетное - то любит :).
var
n : integer;
begin
read (n);
if n mod 2 = 0 then writeln (':(') else writeln (':)');
end.