
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.
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.