Scrieți un program Pascal ce citește de la tastatură 2 numere întregi și verifică dacă aceste numere sunt divizibile (a / b), afișează mesajul ca "sunt divizibile" sau ca "nu sunt divizibile".

Răspuns :

program brainly;

var a,b:integer;

begin

 writeln ('Dati a si b');

 readln(a, b);

 

 if a mod b = 0 then

 begin

 writeln('Sunt divizibile');

 end

 else

 begin

 writeln('Nu sunt divizibile');

 end;

end.

Rezultat:

Vezi imaginea HOWARDAX
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că ați găsit conținutul oferit util și inspirațional. Dacă aveți întrebări suplimentare sau doriți asistență, vă încurajăm să ne contactați. Ne-ar face plăcere să reveniți și nu uitați să ne adăugați în lista dumneavoastră de favorite!


RO Learnings: Alte intrebari