Кто помнит Pascal?

Страницы: 1 2 3  ... 7  ОТВЕТИТЬ НОВАЯ ТЕМА
Инсэйн 21 дек 2015 в 18:25
Рядовой Шутник  •  На сайте 14 лет
1
Цитата (maddread @ 21.12.2015 - 18:22)
ТС, я знаю Pascal, но вот не пойму где это условие в задаче поставлено:
until (cos(y*z)<>0) and (sin(Pi/3+y)<>0); ??

тангенс и котангенс определены не на всей числовой оси, эта проверка на существования соответствующего тангенса/котангенса
parazit37 автор 21 дек 2015 в 18:26
Шутник  •  На сайте 17 лет
1
Цитата (Svarogok @ 21.12.2015 - 18:22)
Оформление странноватое конечно, но алгоритм верный.

Абзацы при копировании из ворда слетели (
Sane4i4ek 21 дек 2015 в 18:28
Юморист  •  На сайте 10 лет
2
Цитата (grably @ 21.12.2015 - 18:08)
ТС прости меня, жопу криворукую! Нечаянно минуc влепила faceoff.gif

А Паскаль помню учили когда-то, но мляяяя... Давнооооо это было.... old.gif

Я поправил. Не огорчайся :)
nonexchange 21 дек 2015 в 18:29
Весельчак  •  На сайте 15 лет
2
Возможно оформить программу надо было с применением функций. В условии первой задачи показана функция. А по коду первой - вроде всё верно.


Это сообщение отредактировал nonexchange - 21 дек 2015 в 18:34
RA2FDR 21 дек 2015 в 18:30
Ярила  •  На сайте 11 лет
0
С сопротивлениями верно подмечено про ноль - надо просто предусмотреть вариант если хоть один ноль, то на выход ноль и все.
parazit37 автор 21 дек 2015 в 18:30
Шутник  •  На сайте 17 лет
0
Блин, про 0 резисторов прям затупил cry.gif

Это сообщение отредактировал parazit37 - 21 дек 2015 в 18:31
9Ip2pa3a 21 дек 2015 в 18:30
Акела про...  •  На сайте 10 лет
4
Цитата (grably @ 21.12.2015 - 18:08)
ТС прости меня, жопу криворукую! Нечаянно минуc влепила faceoff.gif

А Паскаль помню учили когда-то, но мляяяя... Давнооооо это было.... old.gif

не узнаю я Вас, шо случилось...взломали аккаунт?...и раскоряки не будет в этой теме gigi.gif
*****************************************************
А за Паскаль зелень однозначно, Паскаль наше все!, давно это это было, еще в прошлом веке...я еще застал классический Паскаль без турбо который, ООП значит тоже небыло
SkyBB 21 дек 2015 в 18:32
Шутник  •  На сайте 11 лет
1
Цитата (parazit37 @ 21.12.2015 - 18:30)
Блин, про 0 резисторов прям затупил cry.gif

Не переживай, если их номинал ввести 0, то произойдёт то же самое gigi.gif
Lamer84 21 дек 2015 в 18:33
Хохмач  •  На сайте 12 лет
0
Цитата (maddread @ 21.12.2015 - 18:22)
ТС, я знаю Pascal, но вот не пойму где это условие в задаче поставлено:
until (cos(y*z)<>0) and (sin(Pi/3+y)<>0); ??

В математике. Смотреть тангенс п/2 и котангенс 0

Это сообщение отредактировал Lamer84 - 21 дек 2015 в 18:35
Eqvilibrium 21 дек 2015 в 18:34
Ярила  •  На сайте 13 лет
-5
Это херня к програмированию не имеет отношения, ни тебе не метод пузырька, ни массивов. Это в 9классе пишут или гуманитарии.
SkyBB 21 дек 2015 в 18:35
Шутник  •  На сайте 11 лет
4
Кстати, пользователь в курсе, что значения в первой задаче нужно вводить в радианах?
9Ip2pa3a 21 дек 2015 в 18:43
Акела про...  •  На сайте 10 лет
0
Цитата (parazit37 @ 21.12.2015 - 18:16)
Цитата (SuperYago @ 21.12.2015 - 18:11)
until. UNTIL.  О, боги! Индийские кодеры плачут от зависти. По ходу у ТС мания величия.

Изучал его давно, на идеал и не претендую ) Хоть напиши, что конкретно не так, мне ж интересно.

честно говоря совсем забыл Паскаль...
но по закону Ома во второй задаче, если даже одно из параллельных сопротивлений равно 0, то общее будет тоже =0....

ПС. Ваш Кэп biggrin.gif

Это сообщение отредактировал 9Ip2pa3a - 21 дек 2015 в 18:44
parazit37 автор 21 дек 2015 в 18:43
Шутник  •  На сайте 17 лет
2
Спасибо всем, кто отписался по теме и указал на ошибки! Сливайте нафиг тему, я всё осознал )
Нанонимно 21 дек 2015 в 18:45
Герцог Мира  •  На сайте 10 лет
1
Зачёт поставила? Ну и всё.
Уж последнее о чём нужно думать - это мнение о тебе мелкой преподши по информатике. Была бы умной - работала бы программистом, а не преподом.
Lamer84 21 дек 2015 в 18:46
Хохмач  •  На сайте 12 лет
1
По мелочам только если...
В принципе, в первой задаче х можно и не зацикливать, а во второй сначала спросить про кол-во сопротивлений (с проверкой на натуральность), а потом уже в зависимости от одинаковости вычислять. Да и выводить ответ уже после вычислений. Про нулевое сопротивление уже сказали.

Вообще, делать кому-то задания - занятие неблагодарное, полюбасу дураком назовут.
зудука 21 дек 2015 в 18:48
Ярила  •  На сайте 14 лет
0
Когда то сдал зачет на "Искре-256", помню Begin вначале, write в середине и End в конце. И ещё если у "Искры" служебное слово или оператор, например еnd существовало в виде специальной клавиши в верхней части клавиатуры, а студент вбивал это с клавиатуры буквами, то программа могла и не пойти.

Это сообщение отредактировал зудука - 21 дек 2015 в 18:49
Bris2 21 дек 2015 в 18:50
Ярила - динозавр  •  На сайте 13 лет
0
Меня Фортрану-4 учили. Можу только материться на нём: "GO TO END". Всё, что помню.
FatSlon 21 дек 2015 в 18:54
Весельчак  •  На сайте 17 лет
3
Вспомнился чё-то турбопаскакаль, спиздил скрины:

Кто помнит Pascal?
FatSlon 21 дек 2015 в 18:54
Весельчак  •  На сайте 17 лет
0
И ещё

Кто помнит Pascal?
FatSlon 21 дек 2015 в 18:55
Весельчак  •  На сайте 17 лет
0
3-й

Кто помнит Pascal?
FatSlon 21 дек 2015 в 18:55
Весельчак  •  На сайте 17 лет
0
4-й

Кто помнит Pascal?
KingOfICQ 21 дек 2015 в 18:55
Ярила  •  На сайте 13 лет
1
бля, я в институте Фортран изучал.... :\
FatSlon 21 дек 2015 в 18:55
Весельчак  •  На сайте 17 лет
1
6-й:
old-dos.ru

Кто помнит Pascal?

Это сообщение отредактировал FatSlon - 21 дек 2015 в 18:56
Hardity 21 дек 2015 в 19:00
Балагур  •  На сайте 11 лет
5
"дураком" назвала потому, что написал правильно. Студент без косяков не напишет. Контрольные надо писать коряво. Сам попадался.
ГЕОМЕТР 21 дек 2015 в 19:02
ёптальщик  •  На сайте 10 лет
0
Цитата (Marius163 @ 21.12.2015 - 18:18)
COBOL забыли!

Алгол, блеа!
Понравился пост? Ещё больше интересного в ЯП-Телеграм и ЯП-Max!
Только зарегистрированные и авторизованные пользователи могут оставлять комментарии. Авторизуйтесь, пожалуйста, или зарегистрируйтесь, если не зарегистрированы.
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) Просмотры темы: 34 865
0 Пользователей:
Страницы: 1 2 3  ... 7  ОТВЕТИТЬ НОВАЯ ТЕМА

 
 

Активные темы



Наверх