Жұп немес тақ екенін шығару программасын паскаль тілінде құру керек?

0 дауыс
10.4k қаралым

А саны берілген. Жауапқа осы санның жұп немес тақ екенін шығару программасын паскаль тілінде құру керек?

• Санаты: Бағдарламалау

1 жауап

0 дауыс
program sheshim;

var n:integer;

begin

writeln('n sanyn engiz');

readln(n);

if odd(n) then

writeln('Tak san!')

else writeln('Zhub san!');

end.

Ұқсас сұрақтар

127,752 сұрақ
322,321 жауап
153,150 пікір
72,777 қолданушы