Elaborati un program prin intermediul caruia se vor afisa toate numerele pina la 100 care se impart exact la 6.Pascal
Va roggg...mult
GreenEyes71:
În ce limbaj ?
Răspunsuri la întrebare
Răspuns de
1
Salut,
Program Afisarea_nr._de_la_1_la_100_dizivizibile_cu_6;
Var
Counter : Integer;
Begin
For Counter := 1 to 100 do
Begin
If (Counter Mod 6 = 0) Then
Begin
Writeln(Counter);
End;
End;
End.
L-am testat, funcționează fără erori, rezultatul este acesta, adică toate numerele naturale mai mici decât 100 și divizibile cu 6:
6
12
18
24
30
36
42
48
54
60
66
72
78
84
90
96
Green eyes.
Alte întrebări interesante
Matematică,
8 ani în urmă
Engleza,
8 ani în urmă
Engleza,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
9 ani în urmă
Istorie,
9 ani în urmă