Module: サブルーチン: プロシージャと関数 - 2


Problem

7/10

論理関数を使用します

Problem

偶数の場合は「True」を返し、奇数の場合は「False」を返す関数があるとします。
この関数を使って、キーボードから自然数を要求し、それが奇数であれば元の数値より1を加えた数値を表示し、そうでなければ元の数値そのものを表示するプログラムを書きます。

 

time 1000 ms
memory 256 Mb
Rules for program design and list of errors in automatic problem checking

Teacher commentary

Insert the missing code snippets
Pascal
Write the program below 
var n: integer;

function isEven(n: integer): boolean;
begin
    isEven := (n mod 2 = 0);
end;

begin 
end.

     

Program check result

To check the solution of the problem, you need to register or log in!