С+ немесе Паскаль тілінде есеп. Жұп немесе тақ екендігін анықтайтын есеп керек.

Question

Енгізілген бүтін санның жұп немесе тақ екендігін анықтап келесі мәнді енгізуді сұрайтын программа жазу керек.

Answer 1

#include <studio.h>

#include <conio.h>

void main()

{  int a;

1:printf("a saninin manderin engiz:");

scanf ("%d",&a);

if (a%2==0) printf ("%d sani - zhup \n",a);

  else printf ("%d sani - tak \n",a);

printf("kaitalau kazhet bolsa 1-di bas, sigu usin 0-di bas \n");

scanf("%d",&b);

if (b==1) goto 1;

getch();

}

Answer 2

pascal version:
label 1;
1:
read(zn);
if odd(zn) then write('tak') else write('zhup');
write('қайтa енгізу үшін 1 бас');
read(zn);
if zn=1 then goto 1;
end.

Answer 3

program sheshim;

var n:integer;

begin

writeln('n sanyn engiz');

readln(n);

if odd(n) then

writeln('Tak san!')

else writeln('Zhub san!');

end.