Răspuns :
Fractia simplificata se obtine prin simplificarea cu cmmdc
Fie a si b numaratorul respectiv numitorul, si c si d niste variabile cu care se calculeaza cmmdc
1. citeste a si b
2. copiaza valorile variabilelor a si b in c si d
3. daca c egal cu d sari la pasul 6
4. daca c > d atunci actualizeaza variabila c cu c-d, altfel actualizeaza valoarea variabilei d cu d-c
5. sari la pasul 3
6. actualizeaza variabila a cu a/c
7. actualizeaza variabila b cu b/c
8. scrie "fractia este ", a, "/", b
Răspuns:
var
i, n, m: Integer;
begin
Write('Numarator =');
Read(n);
Write('Numitor =');
Read(m);
for i := 2 to 9 do
if (n mod i = 0) and (m mod i = 0) then
begin
Writeln('Numaratorul =', n / i);
Writeln('Numitorul =', m / i);
end;
end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Nu ezitați să ne contactați pentru orice întrebare sau dacă aveți nevoie de asistență suplimentară. Vă așteptăm cu drag data viitoare și nu uitați să ne adăugați la favorite!