Помогите, пожалуйста, написать программу - Страница 5

Ivan · 06.01.2011, 00:39

Цитата:

Сообщение от MrSTEP

Иван, ошибка в первом условии, поменяйте знак в другую сторону

Да, тоже заметил. И еще где-то ошибка

MrSTEP · 06.01.2011, 00:42

Исправил 80 строчку

Код:

10 CLS
20 PRINT "Введите число x"
30 INPUT x
40 PRINT "Введите число y"
50 INPUT y
60 PRINT "Введите число z"
70 INPUT z
80 IF y<x THEN min=y ELSE min=x
90 IF z>min THEN U=z ELSE U=min
100 PRINT U
110 END

Ну вы как ищете меньший из двух в жизни? Сравниваете, какой из них меньше, тот и берете. Потом сравниваем с другим, ищем больший. Все из вашей первой формулы.

Ivan · 06.01.2011, 00:47

MrSTEP, а должно на экран выводиться большее из всех трех чисел?

MrSTEP · 06.01.2011, 00:53

Нет. В первом посте условие

Ivan · 06.01.2011, 00:57

Тогда все правильно, просто не понял условие

MrSTEP · 06.01.2011, 01:15

Ну что автор-то молчит? Пошла прога или нет?

Little_ · 06.01.2011, 11:33

я не поняла, самое большое число должно выводить в ответе? разные цифры подставляю, выводит то большее из них, то среднее..

MrSTEP · 06.01.2011, 11:40

Ну вы формулу ж свои писали: выбирает меньшее и х и у, затем больше из этого меньшего и z

AlexZir · 06.01.2011, 11:42

Цитата:

Сообщение от Little_

даны числа x,y,z. Вычислить U=max(z,min (y,x)).

В задании чётко прописано, что сначала находится минимальное из x,y, потом переменная u получает максимальное значение среди найденного минимального и z.

Код:

INPUT"ВВЕДИТЕ ЧИСЛО X";X
INPUT"ВВЕДИТЕ ЧИСЛО Y";Y
INPUT"ВВЕДИТЕ ЧИСЛО Z";Z
IF X>Y THEN U=Y ELSE U=X
IF U<Z THEN U=Z
PRINT U
END

В отличие от GW-Basic, в QBasic строки нумеровать не обязательно.

Little_ · 06.01.2011, 20:27

блиииин...зря делали(( в Visual Basic нужно делать((((

06.01.2011, 00:42	#42 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Исправил 80 строчку Код: 10 CLS 20 PRINT "Введите число x" 30 INPUT x 40 PRINT "Введите число y" 50 INPUT y 60 PRINT "Введите число z" 70 INPUT z 80 IF y<x THEN min=y ELSE min=x 90 IF z>min THEN U=z ELSE U=min 100 PRINT U 110 END Ну вы как ищете меньший из двух в жизни? Сравниваете, какой из них меньше, тот и берете. Потом сравниваем с другим, ищем больший. Все из вашей первой формулы.

06.01.2011, 00:47	#43 (permalink)
Ivan Member Регистрация: 11.04.2010 Сообщений: 604 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 1528	MrSTEP, а должно на экран выводиться большее из всех трех чисел?

06.01.2011, 00:53	#44 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Нет. В первом посте условие

06.01.2011, 00:57	#45 (permalink)
Ivan Member Регистрация: 11.04.2010 Сообщений: 604 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 1528	Тогда все правильно, просто не понял условие

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

06.01.2011, 01:15	#46 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Ну что автор-то молчит? Пошла прога или нет?

06.01.2011, 11:33	#47 (permalink)
Little_ Member Регистрация: 05.01.2011 Сообщений: 24 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	я не поняла, самое большое число должно выводить в ответе? разные цифры подставляю, выводит то большее из них, то среднее..

06.01.2011, 11:40	#48 (permalink)
MrSTEP 一步一步地会到目的 Регистрация: 09.05.2009 Адрес: Черноземье Сообщений: 10,939 Записей в дневнике: 10 Сказал(а) спасибо: 140 Поблагодарили 80 раз(а) в 33 сообщениях Репутация: 28362	Ну вы формулу ж свои писали: выбирает меньшее и х и у, затем больше из этого меньшего и z

06.01.2011, 20:27	#50 (permalink)
Little_ Member Регистрация: 05.01.2011 Сообщений: 24 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	блиииин...зря делали(( в Visual Basic нужно делать((((