Разное - Всё о TURBO PASCAL (обсуждение, помощь в написание программ, ошибки, Pascal ABC)

Mercenary13 · Отправлено: **09:34, 06-12-2010** | #31

Помогите решить задачу, буду очень благодарен.
Сведения об ученике состоят из его имени и фамилии и названия класса (года обучения и буквы), в котором он учится. Дан типизированный файл f, содержащий сведения об учениках школы:
а) выяснить, имеются ли однофамильцы в каких-либо параллельных классах;
б) выяснить, имеются ли однофамильцы в каком-нибудь классе;
в) выяснить, имеются ли однофамильцы в каких-либо параллельных классах у которых совпадает и имя и фамилия;
г) выяснить, имеются ли однофамильцы в каком-нибудь классе, у которых совпадает и имя и фамилия;
д) выяснить, в каких классах насчитывается более 35 учащихся;

love_molly · Отправлено: **23:06, 10-04-2011** | #32

кто-нибудь,помогите с процедурой
задание №6

lxa85 · Отправлено: **08:36, 11-04-2011** | #33

love_molly, ну и пиши прямым текстом, что тебя смущает?
Пересчитать все значения по строкам, пересчитать все строки, каждый элемент возвести в квадрат и просуммировать. Из полученного значения вычислить корень. Где сложность?

Lksen · Отправлено: **08:54, 19-12-2011** | #34

Привет, ребят. мне надо зачет получать, а я не шарю в программировании вообще. Помогите решить задачи:
1

2

3

4

5

6

Заранее спасибо

lxa85 · Отправлено: **09:16, 19-12-2011** | #35

Lksen,
1. Нужны решения в псевдокоде. Ну или хотя бы ручкой на листе бумаги.
2. тригонометрические функции считать в градусах или в радианах?
3. 6ое задание, как самое интересное - твои мысли, наш код. Не иначе.

Lksen · Отправлено: **10:03, 19-12-2011** | #36

Цитата lxa85:

1. Нужны решения в псевдокоде. Ну или хотя бы ручкой на листе бумаги. »

В смысле "псевдокоде"? уже решенное или как?

Цитата lxa85:

2. тригонометрические функции считать в градусах или в радианах? »

Скорей всего в градусах

Цитата lxa85:

3. 6ое задание, как самое интересное - твои мысли, наш код. Не иначе. »

Не понял. Это задание я списал с книжки, дословно оно звучит вот так:

Скажите поподробней, что я должен сделать, а то ничего не понимаю. Вылететь с первого же курса как то...

lxa85 · Отправлено: **12:11, 19-12-2011** | #37

Lksen,

Цитата Lksen:

В смысле "псевдокоде"? уже решенное или как? »

конечно решенное!
Вы сдаете собственные измышления, а не наши коллективные. Соотв. вы думаете "Как" решать задачу, а мы лишь помогаем с реализацией.

Цитата Lksen:

Скорей всего в градусах »

ЕМНИП Pascal по умолчанию работает с радианами. Напомни плиз, как из этих в те перевести?

Цитата Lksen:

Скажите поподробней, что я должен сделать »

Про задание я понял, к формулировкам претензий нет. Просто через две точки корней уравнения можно провести бесконечное множество парабол. Какую из них выбрать?

Lksen · Отправлено: **13:41, 19-12-2011** | #38

Цитата lxa85:

Соотв. вы думаете "Как" решать задачу, а мы лишь помогаем с реализацией »

У меня в первые дни был как то "прорыв", я мог решать задачки по паскалю, но потом пошло введение в проф деятельность, а там нужно решать физические (физика) и геометрические (геометрия) задачи на паскале, а в школе у меня были двойки за эти предметы..
1)

Код:

program pr1;
const a=0.5;
var b,x,u,f:real;
  Begin
  write('Введите значение b,x:');
  readln(b,x);
  U:=((a*a)*x+exp(-x*ln(e)*cps*b*x))/((b*x-exp(-x*ln(e)*cos*b*x+1));
  f:=exp(2*x*ln(e)*ln(a+x)-exp(3*x*ln(b)*ln(b-x);
writeln ('U=',U:5:3,'  f=',f:5:3);
readln;
End.

И получились у меня

Код:

U=-0,082  и f=-2,905

Это была первая работа, которую надо было сдать, делал ещё когда этот "прорыв" был, а после уже потенциал пропал...
Как делать остальные даже догадок нет, не то, что "что-то решенное".

Цитата lxa85:

ЕМНИП Pascal по умолчанию работает с радианами. Напомни плиз, как из этих в те перевести? »

На просторах интернета нашел следующее, может поможет..

Код:

uses crt;
var Rd,Gr,G,M,S:real;GMS:string;
begin
clrscr;
write('Rd=');readln(Rd);
Gr:=Rd*180/pi;
G:=int(Gr);
M:=int(frac(Gr)*60);
S:=frac(frac(Gr)*60);
Write(Rd:4:2,'rad= ',G:3:0,'gr ',M:3:0,'min ',S:3:1,'sec');
readln
end.

Цитата lxa85:

Про задание я понял, к формулировкам претензий нет. Просто через две точки корней уравнения можно провести бесконечное множество парабол. Какую из них выбрать? »

Не знаю. Я вообще мало что понимаю в этом языке и что нужно. Там я два задания переписал из учебника дословно, ничего помимо этого там не написано.

Lksen · Отправлено: **16:29, 19-12-2011** | #39

Формулы не могу сделать
2)

Lksen · Отправлено: **13:37, 20-12-2011** | #40

Помогите пожалуйста решить, мне работы уже завтра сдавать нужно, ибо - незачет