Salut,
Programul Pascal de mai jos a fost compilat fără erori, a fost testat pentru mai multe perechi de valori întregi, de fiecare dată returnează valoarea minimă, conform cerinței scrise de tine.
program Valoarea_minima;
Uses Math;
var
Val_min : integer;
a : integer;
b : integer;
begin
write('Introduceti primul numar intreg a: ');
readln(a);
write('Introduceti al doilea numar intreg b: ');
readln(b);
if ( a<b ) then
begin
Val_min := a;
writeln('Dintre numerele a si b, numarul mai mic este: ', Val_min)
end
else
begin
Val_min := b;
writeln('Dintre numerele a si b, numarul mai mic este: ', Val_min)
end
end.
Mult succes !
Green eyes.
