Aktív témák
-
czibie
csendes tag
Sziasztok! éppen pascalból vizsgázom, és nem nagyon vágom. Tudna nekem valaki segíteni? Nagyon jó lenne! Nemsokára küldöm mi a feladat!
üdv
ákos -
czibie
csendes tag
1. feladat írjon programot amellyel egy tömböt(vektort) feltölt tetszőleges számú egész számmal(pl. nulla végjeléig). Számítsuk ki a tömbben tárolt értékek átlagát és írjuk ki azt.
Majd olvasson be valós számokat egy tömbbe a 0 végjelig függvény segítségével. A függvényérték a beolvasott adatok száma legyen. Függvények segítségével keresse meg a legkisebb és legnagyobb értéket. A főprogram írja ki a megtalált értékeket és a beolvasott adatok számát.
u.i. aki elküldi a megoldást,annak valahogy meghálálom ezn múlik a félévem -
czibie
csendes tag
2. írjon programot, amely tetszőleges számú kört rajzol a képernyőre. A középpontok koordinátáit(2 dimenzióban) és sugár nagyságát valamint színkódót bill. segítségével vigye fel egy tömbbe. Az adatmegadás végének jelzését szabadon választhatja meg. Az adatbevitel befejezése után rajzolja ki a képernyőre az ábrákat.Az adatbevitelt és rajzolást függvény vagy eljárás segítségével oldja meg.
-
skera
tag
Minimum és maximum kiszámoló függvények
const N=5000;
{Minimum; bemenet egy tomb}
function min(var be: Array [0..N-1] of Integer)
var i,minszam: Integer;
begin
minszam:=N;
for i:=1 to N do
begin
if minszam < be then
begin
minszam:=be;
end;
end;
return minszam;
end;
{Maximum; bemenet egy tomb}
function max(var be: Array [0..N-1] of Integer)
var i,maxszam: Integer;
begin
maxszam:=0;
for i:=1 to N do
begin
if maxszam > be then
begin
maxszam:=be;
end;
end;
return maxszam;
end;
NEM GARANTÁLOM, HOGY JÓ. LEHET, SŐT BIZTOS, HOGY VAN BENNE HIBA!!!!
Főleg a :=-vel vagyok mindig gondba, hiszen régen pascaloztam már. Remélem hasznát veszed valamennyire...import szte.ttk.ptm.*;
-
czibie
csendes tag
Kösziii!
Még a körösre kéne valami, ha nem gond. Ez megoldódni látszik. -
sbazsi
veterán
jééé, vizsga közben lehet internetezni, fórumozni?!
-
czibie
csendes tag
pascal programozás ;)
-
czibie
csendes tag
ja mert kölcsönlaptopról nyomom wi-fi vel ;)
De a megldásra lenne most a legnagyobb szükségem. Akér emailben is küldhettek pas fájlt.
Ákos -
czibie
csendes tag
válasz VladimirR #11 üzenetére
nem csak középsuli, de nem érdekel maga ez a téma, és ha ez a vizsga megvan, nem kell vele többet foglalkoznom. Alapszinten értek hozzá, de ez már nekem sok. És nem szívom el a lehetőséget senkitől, mert alig vagyunk már a csoportban, mindenki hullik ki. Én nem a programozás miatt választottam a szakot, hanem ezernyi más tárgy miatt. Aki meg nagyon ért hozzá menjen el programozónak.
Aktív témák
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- Politika
- Kávé kezdőknek - amatőr koffeinisták anonim klubja
- Facebook és Messenger
- Steam Deck
- Samsung Galaxy S21 FE 5G - utóirat
- Luck Dragon: Asszociációs játék. :)
- Samsung Galaxy S23 Ultra - non plus ultra
- EAFC 24
- Milyen egeret válasszak?
- További aktív témák...