
PASCAL
ahojte, prosím, ak je tu niekto taký, kto vie robiť v pascale, mohol by mi na toto napísať príkazy? Veľmi to potrebujem. Ak by to niekto vedel, bola by som veľmi vďačná. Na obrazovku sa vypíše 1 – nakresli kružnicu, 2 štvorec, 3 čiaru. Následne používateľ 1,2,3. Potom sa opýta program: zadaj počet. Používateľ zadá počet napr: 20. Program vykreslí počet útvarov ktoré zadal používateľ s náhodnými parametrami.
mám zatiaľ toto spravené, ale stále mi to nejde spustiť. Neviete kde mám chybu?
uses crt;
var a:integer;
begin
writeln('zadaj cislo 1-3');
readln(a);
if a=1 then circle(10:20:30);
if a=2 then rectangle(10,20,30);
if a=3 then line(10,20,30);
delay(10000);
end.
Nejde mi to spustit znamená, že to napíše něco o chybě, třeba na jakém řádku a kde.
Proc mas treba u circle argumenty oddelene dvojteckami?
Pochybuju, ze pro nakresleni trojuhelnika postaci 3 cisla. A pochybuju, ze k nakresleni primky potrebujes 3 cisla.
Ty proste pises neco, o cem vubec nic nevis! Ten program ma napovedu, tak si aspon zjisti, jake ty funkce potrebuji argumenty, aby ti vykreslily, co po nich chces.
Ještě pořád ses nevyjádřila, COS to stáhla do notebooku za IDE (předpokládám, žes nestáhla pouze kompilátor) a tedy V ČEM to píšeš a JAKÁ verze to je.
Nevěřím, že vám vyučující jen řekl "udělejte to v Pascalu" a nedal žádný tip na konkrétní implementaci, resp. jste si nikdy žádné praktické příklady nezkoušeli (pak bych logicky očekával, že to, v čem to zkoušíte, rovná se tomu, co se po vás chce).
Termín pro domácí úlohu již vypršel, tak co by se vracela a ztrácela čas odpovídáním...
Ahojte, nedalo sa skôr prísť, chodím na bilingválne gymnázium, mám aj iné predmety okrem informatiky. Na mojom notebooku mi nešli spustiť v Pascale žiadne programy. Program som si nakoniec vytvorila na PC svojho známeho.