Informatică, întrebare adresată de nikolcrazy, 8 ani în urmă

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 ?
nikolcrazy: Informatica
GreenEyes71: Informatica este materia, eu am întrebat despre limbajul de programare.
nikolcrazy: Probleme cu instructiunea For
GreenEyes71: Nici acum nu ai înțeles: limbajul de programare poate fi C++, sau Pascal, sau altul. La care te referi ?
nikolcrazy: Sorry am uitat sa scriu...la pascal
GreenEyes71: Scrie asta sus la enunț, te rog.
nikolcrazy: Poti sa ma ajuti?

Răspunsuri la întrebare

Răspuns de GreenEyes71
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.


nikolcrazy: Multumesc mult!!!
GreenEyes71: Să crești mare !
Alte întrebări interesante