Question

Даны 2 числа. Проверить будут ли они положительные.

Answer 1

Program PRIMER;
Uses crt;
var a,b: real;

Begin
     write('Введите число а = ');
     readln(a);
     write('Введите число b = ');
     readln(b);
     writeln;
     if a<0 then
     writeln ('Число а отрицательное');
     if a>0 then
     writeln ('Число а положительное');
     if a=0 then
     writeln ('Число а равно нулю');
     if b<0 then
     writeln ('Число b отрицательное');
     if b>0 then
     writeln ('Число b положительное');
     if b=0 then
     writeln ('Число b равно нулю');
End.
     

Answer 2

Program primer;
var a,b:integher;
begin
writeln('vvedite a,b:=');
readln(a,b);
if (a<0) and (b<0) then writelln('yes') else writeln('no');
readln;
end

Answer 3

Для проверки, являются ли два числа положительными, вы можете использовать простое сравнение. Если оба числа больше нуля, то они положительные. Вот пример на псевдокоде:

arduinoCopy code
если число1 > 0 и число2 > 0 то
    // Оба числа положительные
    вывести "Оба числа положительные"
иначе
    // Хотя бы одно число не положительное
    вывести "Хотя бы одно число не положительное"
конец если

Вы можете заменить "число1" и "число2" на конкретные числа, которые вы хотите проверить.