Составить программу печатающую значение true если указанное высказывание истина и false в противном случае: .сумма двух целых чисел кратна 2.
153
278
Ответы на вопрос:
var
a, b: integer;
begin
write('введите первое число '); readln(a);
write('введите второе число '); readln(b);
writeln((a + b) mod 2 = 0);
end.
Progran hhh54; var i,k,x: longint; begin k: =0; for i: =1 to 1000 do; begin read (x); if (x mod 2 < > 0) and (x mod 3 = 0) then k: =k+1; if x=0 then begin break end; end; write (i-1,' ',k); end.
Популярно: Информатика
-
armanovi0508.12.2020 00:35
-
zaporozkayaoks05.04.2023 05:20
-
angelinakovalev20.08.2021 11:38
-
фелекс5427.02.2021 02:30
-
1979200126.10.2022 05:57
-
мариэтта302707.01.2023 03:13
-
egor57020.06.2021 17:20
-
hdhdhdhehd16.02.2020 02:30
-
lerkina1211.04.2020 23:10
-
dina5364613.11.2022 06:38