Колко са положителни?

Публикувано на 08 март, четвъртък от Данаил

Да се въведат две реални числа и да се изведе колко от тях са положителни – и двете, само едното или нито едно от тях.

Публикувано в 9в с етикети . Постоянна връзка.

3 Responses to Колко са положителни?

  1. Lubomir Dizela каза:
    12 март, понеделник в 13:49

    Ne oburnah vnimanie na zadachata i q napravih po razlichen nachi.
    Shte publikuvam i nego zashtoto mislq che tova moje da obogati znaniqta ni.

     program Chisla;
   var
   c1, c2, c3: integer;


begin
 WriteLn ('Vuvedete tri chisla: ');
 ReadLn (c1, c2, c3);
 if c1<0 then WriteLn(c1, ' e otricatelno chislo') else WriteLn(c1, ' e polojitelno chislo');
 if c2<0 then WriteLn(c2, ' e otricatelno chislo') else WriteLn(c2, ' e polojitelno chislo');
 if c3<0 then WriteLn(c3, ' e otricatelno chislo') else WriteLn(c3, ' e polojitelno chislo');
 ReadLn;

end.
  2. Violeta каза:
    12 март, понеделник в 14:11 
     program Project1;
var
a, b: integer;
begin
Write('vavedete dve chisla');
ReadLn(a, b) ;
if (a>0) and (b>0) then
WriteLn('plojitelnite sa dve');
if(a>0) and(b<0) then
WriteLn( 'edno polojitelno chislo  a ' );
if (a<0) and (b>0)then
WriteLn('edno polojitelno chislo b  ' );
if (a<0) and (b<0) then
WriteLn ('Nqma polojitelni chisla ');
ReadLn;
end.
  3. Данаил каза:
    19 март, понеделник в 11:35

    Виолета – вярно е, само че може да сложиш по един else пред if-овете след първия, за да не се испълняват следващите проверки, ако се е изпълнила първата, защото всички тези варианти са взаимноизключващи се.

Вашият коментар