помогите пожалуйста |
Здравствуйте, гость ( Вход | Регистрация )
помогите пожалуйста |
EkaterinaKozitsyna |
8.4.2011, 16:54
Сообщение
#1
|
Новичок Группа: Продвинутые Сообщений: 7 Регистрация: 7.4.2011 Из: Москва. родной город Сочи Город: Москва Учебное заведение: МГУТУ |
ЗАДАЧА 1. Имеется четыре A,B,C,D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что среди этих чисел нет равных? Ответ ЭВМ должна вывести в виде текста – слов ”Правда” или ”Неправда”.
ЗАДАЧА 2. Составить программу вычисления и выдачи на печать суммы (или произ¬ведения) N элементов бесконечного числового ряда. Здесь и далее следует пользоваться операторами цикла FOR или WHILE. y=256(-64)16(-4)1... ЗАДАЧА 3. Имеется массив A из N произвольных чисел A(N), среди которых есть положительные, отрицательные и равные нулю. Составить программу, выполняющую задачу Вычислить произведение всех положительных чисел меньших 20. Так, если A={2,24,-3,6,5,-2,33}, результат: 265=60. ЗАДАЧА 5. Выполнить действия над массивами. В таблице при формулировании задания для разъяснения его сути справа отображены примеры исходных X и результирующих Y массивов с конкретными числами. Программа, естественно, должна обрабатывать любые числа для массивов произвольной размерности N. Программа должна предъявлять исходные и новые (если требуется) массивы. Занести из X в Y сначала элементы, находившиеся на четных местах в X, а затем – на нечетных. 2 3 1 2 5 4 X 3 2 4 2 1 5 Y |
Vahappaday |
8.4.2011, 19:30
Сообщение
#2
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Какой язык? И свои идеи в студию?
|
EkaterinaKozitsyna |
10.4.2011, 19:23
Сообщение
#3
|
Новичок Группа: Продвинутые Сообщений: 7 Регистрация: 7.4.2011 Из: Москва. родной город Сочи Город: Москва Учебное заведение: МГУТУ |
QBASIC.
Были бы ещё эти идеи) |
EkaterinaKozitsyna |
11.4.2011, 14:16
Сообщение
#4
|
Новичок Группа: Продвинутые Сообщений: 7 Регистрация: 7.4.2011 Из: Москва. родной город Сочи Город: Москва Учебное заведение: МГУТУ |
задача3.
CLS INPUT "N=", N DIM M(N) FOR T = 1 TO N PRINT "M["; T; "]="; INPUT M(T) NEXT T PRINT "Shchitaem" B = 1 FOR T = 1 TO N IF (M(T) > 0) AND (M(T) < 20) THEN B = B * M(T) END IF NEXT T PRINT B PRINT "Bye bye" END тут всё правильно? |
Vahappaday |
13.4.2011, 3:10
Сообщение
#5
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Да, всё правильно. Сами делали?
Вот первая задача Код CLS INPUT "A=", A INPUT "B=", B INPUT "C=", C INPUT "D=", D IF A = B THEN PRINT "Nepravda" END END IF IF A = C THEN PRINT "Nepravda" END END IF IF A = D THEN PRINT "Nepravda" END END IF IF B = C THEN PRINT "Nepravda" END END IF IF B = D THEN PRINT "Nepravda" END END IF IF C = D THEN PRINT "Nepravda" END END IF PRINT "Pravda" END |
EkaterinaKozitsyna |
13.4.2011, 5:57
Сообщение
#6
|
Новичок Группа: Продвинутые Сообщений: 7 Регистрация: 7.4.2011 Из: Москва. родной город Сочи Город: Москва Учебное заведение: МГУТУ |
нет. мне помогали. спасибо боьшое за первую задачу
|
Vahappaday |
15.4.2011, 2:27
Сообщение
#7
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Вот 5-я.
Код CLS INPUT "N=", N DIM X(N) DIM Y(N) FOR i = 1 TO N PRINT "X["; i; "]="; INPUT X(i) NEXT i = 1 FOR j = 2 TO N STEP 2 Y(i) = X(j) i = i + 1 NEXT FOR j = 1 TO N STEP 2 Y(i) = X(j) i = i + 1 NEXT PRINT "X: " FOR i = 1 TO N PRINT X(i) NEXT PRINT "Y: " FOR i = 1 TO N PRINT Y(i) NEXT END 2-ю, откровенно говоря, не понял |
EkaterinaKozitsyna |
16.4.2011, 12:09
Сообщение
#8
|
Новичок Группа: Продвинутые Сообщений: 7 Регистрация: 7.4.2011 Из: Москва. родной город Сочи Город: Москва Учебное заведение: МГУТУ |
спасибо)
|
Текстовая версия | Сейчас: 30.1.2025, 3:07 |
Зеркало сайта Решебник.Ру - reshebnik.org.ru