Free Pascal programozás (? ) valaki help
hogy kell egy olyan programot csinálni ami kiírja 1 és 100 között az 5-tel osztható számokat?
nem nagyon értem ezt a programozást :( valaki help
még ilyen use, meg CRT-ket nem vettünk egyedül az IF,MOD,DIV ezeket de akkor se megy, sőt nekem midnig híbát ír ki amikor lefuttatom mindig, így még a progi sem indul :(
válasza:Le tudnád írni, ami eddig megvan?
Amúgy marha egyszerű, a mod megadja, mennyi a maradék.
ha i mod 5 = 0 akkor az öttel osztható, szóval kiírod i értékét, ha nem felel meg a feltételnek, növeled i-t egyel és megnézed, öttel osztható-e.
Egyébként mi a hiba? (Ezért is jó lenne látni, ami meg van írva).
Aztán megoldjuk, hidd el, ez nem nehéz, segítek.
így csináltam
program osztas;
VAR
szam,i:integer;
Begin
FOR i=i to 100 do
Writeln(i),
Readln;
end.
Begin
Writeln('szám');
Readln(szam);
IF szam MOD 5=0 then
Writeln('osztható');
Readln;
end.
válasza:tehát az öttel nem osztható számokat írta ki?
ha igen, akkor már majdnem meg van
nem,
1-100-ig simán kiírta a számokat
1,2,3,4,5,6,7,8,9,10,11,12..100 így mondom
válasza:á, látom
ha a feltétel igaz, akkor kéne kiiratni
és azt nem írja ki minden ötödiknél, hogy osztható?
válasza:evvel próbálkozz:
VAR
szam,i:integer;
Begin
FOR i=1 to 100 do
IF i MOD 5=0 then
Writeln(i);
Readln;
end.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, 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!