Регистрация
a1b2c5612z
07.10.2022 01:02
Информатика
Есть ответ 👍

Дано целое число оканчивается ли оно четной цифрой. паскаль

291
413
Посмотреть ответы 3

Ответы на вопрос:

Яра3838367373
Яра3838367373
4,7(14 оценок)

ответ:

var x: integer;

begin

read(x);

if x mod 2=0 then write('да')

else write('нет');

end.

polinka2002761
polinka2002761
4,7(77 оценок)

да так как они оканчиваются на любую цифру

Кейси001
Кейси001
4,5(32 оценок)
Program asd; var b,c,d: array[1..2500] of integer; i,max,min,n: integer; begin writeln('введите размерность одномерного массив d: '); readln(n); max: =d[1]; for i: =1 to n do begin write('введите d[',i,']: '); readln(d[i]); if max< d[i] then max: =d[i]; end;   writeln('максимальный элемент в массиве: ',max);   writeln('положительный массив b из d: ');   min: =d[1];   for i: =1 to n do   begin   if d[i]> 0 then           b[i]: =d[i];     if d[i]< 0 then         c[i]: =d[i];     if min> c[i] then     min: =c[i];         write(b[i]: 4);         end;   writeln;   writeln('отрицательный массив c из d: ');   for i: =1 to n do   begin   write(c[i]: 4);   end;   writeln();   writeln('минимальный элемент в массиве с: ',min); end.

Популярно: Информатика