Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Составьте алгоритм для определения наименьшего из 3 положительных чисел.

Ответ оставил Гость

var

  n1,n2,n3,min:word;

begin

  write (N1= );readln(n1);

  write (N2 = );readln(n2);

  write (N3 = );readln(n3);

  if (n1

    if (n2

  writeln (Min: ,min);

  readln;

end.