Премини към съдържанието

Hunti

Потребител
  • Публикации

    5
  • Регистрация

  • Последно онлайн

Харесвания

0 Неутрална репутация

Всичко за Hunti

  • Титла
    Новобранец
  1. Hunti

    Помощ за задачи на Pascal (merged)

    kanar4e, благодаря за отговора и помощта, но не успявам да се справя с тази процедура. Трябвада изведа минимималния от всеки ред (предполагам ще трябва да се запишат тези стойности във вектор) и от там да изведа максималния и изобщо не ми е ясно това, та дори и извеждането в основната програма
  2. Hunti

    Помощ за задачи на Pascal (merged)

    благодаря за бързия отговор оправих част от основната програма (това с въвеждането на число > от 20 и мисля, че сега е наред) С въвеждането на М и N всичко е наред, въвеждам масива, извеждам го, но все пак процедурата за намиране на минимумите по редове и след това максимума от тях ми е много оплетена Аз ще продължавам да се мъча и ще се радвам на още малко помощ Благодаря още веднъж п.с. в предния си пост обнових пооправения код на програмата
  3. Hunti

    Помощ за задачи на Pascal (merged)

    Здравейте на всички Имам да направя програма на паскал, но много много не ми се отдава Задачата е следната: Дадени са три двумерни масива A[M,N], B[M,N], C[M,N] (M≤20, N≤20 като M и N се въвеждат от клавиатурата) с реални елементи. Да се разработят три процедури за изпълнение на следните действия: - въвеждане на елементи в масивите - отпечатване на въведениете елементи в масивите - намиране на минималните елементи по редове и определяне на най-големия от всички минимуми В главната програма процедурите се извикват последователно за всеки масив. Опитал съм се да направя част от нея, но останалата част не ми е ясна. Надявам се да не се спукате от смях на това, което съм писал в третата процедура, но все пак някак трябва да се помъча. Имам и въпрос относно това за задаване на М и N от клавиатурата, вие ще кажете дали има нещо вярно в това ,което съм написал, и другия въпрос на този етап е защо след като съм дефинирал тип-а Matrix и след това променливите M и N при опит да компилирам (все пак да пробвам дали нещо от това, което съм написал работи ) ми изписва, че няма такав идентификатор (M и N) :? program Kursova(Input,Output); type Matrix=array[1..20,1..20]of Real; Vector=array[1..20]of Real; var A,B,C:Matrix; M,N:Integer; I,J:Integer; V:Vector; procedure Inp(var E:Matrix); begin for I:=1 to M do for J:=1 to N do Read(E[I,J]); end; procedure Otp(var E:Matrix); begin for I:=1 to M do begin for J:=1 to N do Write(E[I,J]:6:2); writeln; end; end; procedure Min(var E:Matrix;var V:Vector); var MinS:Real; begin V:=E[I,J]; MinS:=0.0; for I:=1 to M do V:=E[I,J]; for J:=1 to N do begin V:=E[I,J]; if E[I,J]<MinS then MinS:=E[I,J]; V:=MinS; end; end; begin Write('vavedete M<=20, M='); Readln(M); if M>20 then Write('vyvedenoto 4islo M e po-golqmo ot 20') else begin Write('vavedete N<=20, N='); Readln(N); If N>20 then Write('vavedenoto 4islo N e po-golqmo ot 20') else begin Writeln('vavedete stoinosti za A'); Inp(A); Otp(A); Min(A,V); WriteLn('vavedete stoinosti za B'); Inp(B); Otp(B); Min(B,V); end; end; readln; end. Отново се извинявам за може би смехотворните редове от опита ми да направя нещо
  4. Hunti

    Есета на всякакви теми -

    тези ги намерих, първото ще го използвам другите са във вид на доклад повече, а не на есе мерси все пак ...
  5. Hunti

    Есета на всякакви теми -

    търся есе на тема "Корупцията - основен проблем на гражданското общество" трябва ми до петък, а в нет-а нищо не намерих
  • Разглеждащи това в момента   0 потребители

    Няма регистрирани потребители разглеждащи тази страница.

×

Информация

Поставихме бисквитки на устройството ви за най-добро потребителско изживяване. Можете да промените настройките си за бисквитки, или в противен случай приемаме, че сте съгласни с нашите условия за ползване.