1. a^2+(c+b)^2>=10 2. odd(c*(c+1)) 3. x xor (not y) 4. (x and y) or not(x)
Перевести на язык программирования
Пожалуйстааааа

В виде программы паскаль

напиал

А модно ещё спросить кое что,это по теме: логический тип данных?

да, для удобства пиши в лс

Хорошо, спасибо

program Project1;{$APPTYPE CONSOLE}{$R *.res}uses  System.SysUtils;var a, b, c, x, y:integer;begin    write('Enter a: ');    readLn(a);    write('Enter b: ');    readLn(b);    write('Enter c: ');    readLn(c);    write('Enter x: ');    readLn(x);    write('Enter y: ');    readLn(y);    writeLn('a^2+(c+b)^2>=10: ', a*a + (c+b)*(c+b) >=10);    writeLn('odd(c*(c+1)): ', (c*(c+1)) mod 2 = 1);    writeLn('x xor (not y): ', x xor not y);    writeLn('(x and y) or not(x): ', (x and y) or not x);    readln;end.