-
Ripper346.
Prince Of Game Legend Member lv15
- Group
- Member
- Posts
- 6,746
- Location
- dalla casa dell'Uomo del Monte
- Status
- Offline
ecco quello fra tre numeri, l'avrai già visto 
SPOILER (click to view)program M_C_D;
uses crt;
var a, b, c, r, MCD: integer;
begin
clrscr;
write ('Inserisci il primo numero= ');
readln (a);
write ('Inserisci il secondo numero= ');
readln (b);
write ('Inserisci il terzo numero= ');
read (c);
repeat
r:= a mod b;
a:= b;
c:= a;
b:= r;
until r=0;
MCD:= a;
write ('Il MCD risulta= ',MCD);
repeat until keypressed
end..