• Предмет: Информатика
  • Автор: getbekbakytbek
  • Вопрос задан 8 лет назад

напишите программу которая после ввода 4 положительных чисел от 0 до 99 находит наименьшее из них

Ответы

Ответ дал: dadasay41
0
uses crt;   
var a,b,c,d,v:integer;   
begin 
  readln (a,b,c,d); 
  if (a<b) and (a<c) and (a<d) then v:=a;   
if (b<a) and (b<c) and (b<d) then v:=b; 
if (c<a) and (c<b) and (c<d) then v:=c;
if (d<a)  and (d<b)  and (d<c) then v:=d; 
  writeln (v);
end.

тут исправленно

Ответ дал: dadasay41
0
uses crt;
Ответ дал: dadasay41
0
var a,b,c,d,v:integer;
Ответ дал: dadasay41
0
begin
Ответ дал: dadasay41
0
readln (a,b,c,d);
Ответ дал: dadasay41
0
if (a
Ответ дал: hikon333
0
Вот программа, она находит наименьшее число до 99
Приложения:
Похожие вопросы