Programozás! Hogyan?
Ennek a feladatnak a megoldására lenne szükségem:
A KI(X) eljárás az X szöveges kifejezés értékét írja a szabványos kimenetre (általában a képernyőre), az aktuális karakter-pozícióba.
A KI(új_sor) eljáráshívás egy „új sor” karaktert ír a kimenetre.
A NEM(V) logikai függvény a paramétere tagadását adja eredményül.
Beadandó az algoritmust Pascal nyelven kódolva tartalmazó fájl!
Változók:
V:logikai
I:egész
J:egész
Program eleje
V := igaz
Ciklus i:=1-től 8-ig 1-esével
Ha i páratlan szám akkor V:= igaz
különben V:= hamis
elágazás vége
Ciklus j:=1-től 8–ig 1–esével
Ha V akkor KI(„A”)
különben KI(„B”)
elágazás vége
V := NEM(V)
Ciklus vége
KI(új_sor)
Ciklus vége
Program vége
Köszönöm előre is a segítségeket!
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz2.png)
![*](http://static.gyakorikerdesek.hu/p/vsz1.png)
Mi a kérdés? Az egész le van programozva, csak szintaktikailag kell átírni pascalra. Például:
"Változók:
V:logikai
I:egész
J:egész"
var V:boolean;
I:integer;
J:integer;
"Program eleje
V := igaz
Ciklus i:=1-től 8-ig 1-esével
Ha i páratlan szám akkor V:= igaz
különben V:= hamis
elágazás vége "
begin
V:=true;
for i:=1 to 8 do begin
if (i mod 2) > 0 then V:=true
else V:=false;
end;
satöbbi, satöbbi, staöbbi, csak át kell írni soronként. Lehet, hogy néhol vétettem szintaktikai hibát, mert évek óta nem programoztam pascalt, de a lényeg szerintem érthető.
Kapcsolódó kérdések:
Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!