LukasM

Kuriu įvairiausio tipo internetinius tinklalapius, atlieku įvairius programavimo darbus, dizaino korekcijas.

Turimos žinios:

PHP, MySQL, HTML5, CSS3, JavaScript(jQuery), Bootstrap.

Symfony5, Laravel, CakePHP, CodeIgniter, WordPress.

Kainos sutartinės. Dirbu ~30h į savaitę.

Visais klausimais rašykit PM

Sveiki,

turiu projektėlį, kurį reiks įgyvendint. Kadangi nelabai esu susidūręs su tokiais projektais tai nežinau kokį TVS'ą būtų galima jam naudot ir ar išvis kažkokį opensource'a naudot, o gal kūrt savo tarkim naudojant kokį nors framework'ą.

Tinklapio esmė bus jog į jį bus keliami video, kurie bus pardavinėjami. Tarkim vartotojas užsisako norimą video pagal jo aprašymą ir gauna į e-mailą kodą kurį įvedus galės peržiūrėt savo nusipirktą video ir t.t.

Adminas galės upload'int tuos video per administravimo panele ir t.t.

Norėjau paklaust ką pasiūlytumet naudot kuriant tokio tipo tinklapį? Galbūt manot jog būtų galima kitaip šį projektą įgyvendint? Pasidalinkit patirtimi. Ačiū.

Susižinojau jau pats.

Jei kam prireiktų.

k=0;
 for(i=0; myStr[i] != '\0'; i++) {
      if(myStr[i] == ' ' && myStr[i+1] == ' ' ) 
         continue;           
      newStr[k] = myStr[i];
      k++;
  } 

Hmm. Gal galetum kokį mini pvz parodyt nes nelabai pagaunu kampą.

Sveiki,

reikia parašyt programą kuri nuskaitytu tekstą iš failo ir patikrintų ar tarp žodžių yra tik vienas tarpas.

Jei yra daugiau nei vienas tai pakeistų į vieną ir atspausdintų jau sutvarkytą tekstą.

Gal turit idėjų kaip reiktų padaryt pakeitimą, kad tuos tarpus sumažintų iki vieno tarpo?

Sveiki,

noriu paklaust kaip reiktų nuskaityt skaičius einančius stulpeliu žemyn iš .txt failo, įmest juos į masyvą ir atspausdint.

Kažką čia bandžiau, bet nieko neišėjo..

#include <stdio.h>
#include <stdlib.h>

int main(){
int i,a;
int m[100];
FILE *fp;

a=0;
fp = fopen("failas.txt", "r");

if(fp) {
   while(!feof(fp)){
	fscanf(fp,%d,&m[a]);
	a++;
       }
       }
fclose(fp);


for (i=0;i<a;i++)
{

   printf("%d \n",m[i]);
}

system("pause");
return 0;
}

failas.txt:

1
5
2
4
9
8
5
4
3
4
1
0
9
2
3
5
4
10
1

RADAU klaida ! :D

sita eilute: fscanf(fp,%d,&m[a]);

turetu but tokia: fscanf(fp,"%d \n",&m[a]);

Nu jis man nesuveikė, bet žiūrėdamas į tavo algoritmą ( ypač antrą dalį ) persidariau savo, dėkui :)

Sveiki,

turiu problemėlę, niekaip nepavyksta išspręsti šio uždavinio:

Duotas sveikų skaičių masyvas, kuriame skaičiai gali kartotis. Sukurti kitą masyvą į kurį pakliūna tik pasikartojantys skaičiai.

Pvz.:

Sukuriame masyvą kurio elementu reikšmės yra: 1 1 1 2 2 3 2 4

Į naują masyvą turėtų pakliūti šios reikšmes(taip pat turetu but atspausdintos): 1 2.

Čia mano bandytas rašyti kodas ( "nedadarytas" aišku ):

Kodas:

#include<stdio.h>
#include<stdlib.h>

int main(){
   int i,j,d,n,p;
   int s[100],m[100];
   printf("Iveskite elementu kieki \n");
   scanf("%d",&n);
   for(i=1;i<=n;i++){
                     printf("Iveskite %d-aja elemento reiksme \n",i);
                     scanf("%d",&m[i]);
                     }
   printf("Sudarytas masyvas: \n");   
   for(i=1;i<=n;i++){
                     printf("%d \n",m[i]);
                     }
   printf("Masyvas kuriame yra tik pasikartojantys elementai: \n");
   d=0;
   p=0;
   for(i=1;i<=n;i++){
                     d++;
                     for(j=1+d;j<=n;j++){
                                       if(m[i]==m[j]){           
                                          s[i]=m[i];
                                          p++;
                                                      } 
                                                      }
                                                      }
   for(i=1;i<=p;i++){
                     printf("%d \n",s[i]);
                     }
   system("pause");
   return 0;
}

Problema tame, kad kai sukuriu masyvą kuriame yra daugiau nei 2 kartus pasikartojančios tos pačios reikšmės man spausdina nesąmones.

Nežinau kaip turėtų atrodyt algoritmas, kad spausdintų pasikartojančias reikšmes po vieną kartą.

Tikriausiai per daug sudėtingai galvoju...

Būtų malonu jei kas nors atvestų į teisingą kelią. :huh:

Taip, nelabai suvokiu nes pascalis man niekada nepatiko, plius ji pradejau mokytis tik 12klasej, bet kadangi ryt egzaminas tai tikiuosi nors imsokt nuskaityt teisingai duomenis is failo ir juos atspausdinti, galbut net ir surikiuot ka nors, kad gauciau nors kiek tasku uz praktine dali.

Mano manymu, tas ciklas nuskaito grupeje esancius narius ir ju kieki priskiria k.

Dekui uz pataisymus :)

Dar turiu viena klausimeli, kaip reiktu nuskaityt ir atspausdint truputi kitaip isdestytus duomenis. Kazka bandziau padaryt analogiskai kaip ir su praeitu nuskaitymu bet nieko nesigauna. Gal galetumet pataisyt.

duom.txt:

4
Petras         3
5 13 8
4 0 5
16 1 0
Algis          1
9 6 13
Jurgis         4
4 14 2
4 4 15
16 15 251
1 2 3
Rita           2
6 65 4
4 4 13

programa:

program Bevarde;
type group= record
               v:string[15];
               b,r,l:integer;
               end;
type mas= array[1..30] of group;
var i,n,m,j,k:integer; G:mas; Df,Rf:text;

procedure skaitom;
begin
       k:=0;
       Assign(Df,'duom.txt'); Reset(Df);
       readln(Df,n);
       for i:=1 to n do
       begin
       readln(Df,G[i].v,m);
       for j:=1 to m do
       begin
       k:=k+1;
       Readln(Df,G[k].b,G[k].r,G[k].l);
       end;
       end;
       close(Df);
end;

begin
skaitom;
Assign(Rf,'rez.txt'); Rewrite(Rf);
for i:=1 to n do
WriteLn(Rf,G[i].v);
for i:=1 to k do
WriteLn(Rf,G[i].b,' ',G[i].r,' ',G[i].l);
close(Rf);
end.

rez.txt turetu buti:

Petras         
5 13 8
4 0 5
16 1 0
Algis          
9 6 13
Jurgis         
4 14 2
4 4 15
16 15 251
1 2 3
Rita           
6 65 4
4 4 13

Sveiki, prikelsiu tema nes iskilo dar vienas klausimelis su tuo paciu kodu.

Taigi prie savo praejusios programo pridejau rikiavimo koda kuris turetu surikiuoti vardus su jiem priskirtais skaiciais mazejimo tvarka ir nesuprantu kodel man meta klaida jei viskas atrodo lyg ir gerai.

Stai duom.txt failiukas

2
4
Lukas  7
Gedas  9
Rokas  10
Adomas 12
3
Petras 5
Ona    11
Jonas  8

programa:

program praktine1;
type group= record
           v:string[7];
           sk:integer;
           end;
type mas= array[1..30] of group;
var i,n,m,j,k,c,d,b:integer; G:mas; Df,Rf:text;

procedure skaitom;
begin
       k:=0;
       Assign(Df,'duom.txt'); Reset(Df);
       readln(Df,n);
       for i:=1 to n do
       begin
       readln(Df,m);
       for j:=1 to m do
       begin
       k:=k+1;
       Readln(Df,G[k].v,G[k].sk);
       end;
       end;
       close(Df);
end;

procedure rikiuot;
begin
   for i:=1 to k-1 do
   begin
   d:=i;
   for j:=i+1 to k do
   if G[d].sk < G[j].sk then d:=j;
   c:=G[d].sk; G[d].sk:=G[i].sk; G[i].sk:=c;
   b:=G[d].v;  G[d].v:=G[i].v;   G[i].v:=b
end;
end;

begin
skaitom;
rikiuot;
Assign(Rf,'rez.txt'); Rewrite(Rf);
for i:=1 to k do
WriteLn(Rf,G[i].v,G[i].sk);
close(Rf);
end.

O cia ka tureciau gaut rez.txt faile:

Adomas 12
Ona    11
Rokas  10
Gedas  9
Jonas  8
Lukas  7
Petras 5

Padekit jei galit, dekui.

Dekui uz pastabas ir koda.

Sveiki, niekaip neiseina parasyt programos kuri nuskaitytu duomenis is failo ir juos atspauzdintu. Kazkaip iki galo nenuskaito duom.txt faile esanciu duomenu, nesuprantu kas cia blogai.

duom.txt failiukas:

2

4

Lukas 7

Gedas 10

Rokas 10

Adomas 12

3

Petras 5

Ona 12

Jonas 8

Mano rasyta programa:

program Bevardë2;
type group=record
       v:string[7];
       sk:integer;
    end;
type mas=array[1..20] of group;

var i,n,m:integer; Rf,Df:text; G:mas;

procedure skaitom;
begin
Assign(Df,'duom.txt'); Reset(Df);
ReadLn(Df,n);
for i:=1 to n do
begin
ReadLn(Df,m);
for i:=1 to m do
ReadLn(Df,G[i].v,G[i].sk);
close(Df);
end;
end;


begin
skaitom;
Assign(Rf,'rez.txt'); Rewrite(Rf);
for i:=1 to n do
begin
for i:=1 to m do
WriteLn(Rf,G[i].v,G[i].sk);
close(Rf);
end;
end.

Sukompiliaves programa, rez.txt faile gaunu atspauzdinta tik pirma grupe zmoniu ir skaiciu. Gal galetumet paziuret kas cia blogai ir ko truksta..