În pascal
Mă poate ajuta cineva vă rog?
Anexe:

Răspunsuri la întrebare
Răspuns de
0
program p1;
var a, b, c, max, min : integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
max := 0; min := 0;
if max < a then max := a;
if max < b then max := b;
if max < c then max := c;
if min > a then min := a;
if min > b then min := b;
if min > c then min := c;
writeln('Max = ', max);
writeln('Min = ', min);
end.
Alte întrebări interesante
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Informatică,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă