Даны два числа А и В. Составить программу, которая выводит на экран сообщение «Истинно», если заданное высказывание верно и «ложно» в противном случае.
а. Числа А и В четные.
6. Число А кратно 4.
с. 2*А=В
4. Сумма чисел А и В > 0. Решить через паскаль
var
A, B: integer;
begin
write('Введите число А: ');
readln(A);
write('Введите число В: ');
readln(B);
if (A mod 2 = 0) and (B mod 2 = 0) then
writeln('Истинно')
else
writeln('Ложно');
end.
var
A: integer;
begin
write('Введите число А: ');
readln(A);
if A mod 4 = 0 then
writeln('Истинно')
else
writeln('Ложно');
end.
var
A, B: integer;
begin
write('Введите число А: ');
readln(A);
write('Введите число В: ');
readln(B);
if 2*A = B then
writeln('Истинно')
else
writeln('Ложно');
end.
var
A, B: integer;
begin
write('Введите число А: ');
readln(A);
write('Введите число В: ');
readln(B);
if A + B > 0 then
writeln('Истинно')
else
writeln('Ложно');
end.
Нажимая «Регистрация» или «Войти через Google», вы соглашаетесь с Публичной офертой, даете Согласие на обработку персональных данных, а также подтверждаете что вам есть 18 лет
Нажимая «Регистрация» или «Войти через Google», вы соглашаетесь с Публичной офертой, даете Согласие на обработку персональных данных, а также подтверждаете что вам есть 18 лет