Умные вопросы
Войти
Регистрация
pascal измучился думать что не так?
10 года
назад
от
Александр Ардов
1 ответ
▲
▼
0
голосов
var i, min:integer;
begin
readln (i) ;
min:=i;
while (i) 0) do
begin
if (i больше или меньше или равно - нет условия (min) then min:=i;
readln (i) ;
end;
readln;
end.
в итоге написано следующе: взять и присвоить мин значение и. проверить если и больше меньше равно не равно - не написано. . тогда опять взять и и ждать нажатие кнопки ентер
10 года
назад
от
Gvidon
Связанные вопросы
1
ответ
Диаметр звезды 28000000000км, самолет летит 900км/ч, за сколько он облетит эту звезду
9 года
назад
от
Андрей Косенко
1
ответ
Сколько литров газа вмещает 1-литровый баллон кислорода?
4 года
назад
от
Richerd MS
1
ответ
Домашний кинотеатр можно ли использовать как DVD плер
9 месяцев
назад
от
слава