Program: największy wspólny dzielnik.
Po podaniu przez użytkownika dwóch liczb z których wylioczny zostaje następnie – największy wspólny dzielnik.
Kompilator: Turbo Pascal
Galeria:
Kod programu:
program NWD;
uses crt;
var
a,b:integer;
begin
clrscr;
writeln('Podaj liczby, z których chcesz uzyskac NWD');
readln(a);
readln(b);
while a<>b do
if a>b then
a:=a-b
else
b:=b-a;
writeln('NWD to ',a);
readln;
end.Słowniczek pojęć:
Największy wspólny podzielnik – dla danych dwóch (lub więcej) liczb całkowitych największa liczba naturalna dzieląca każdą z nich.