Zadania mają być napisane w( Pascal)
Zad 1 Napisz program,który wypisze 20 kolejnych liczb parzystych.
Zad2 Napisz program ,który wypisze liczby naturalne z przedziału od 50 do 100 i podzielne przez 2
Proszę o bardzo szybką pomoc .....
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
1.
Program Z1;
Var I: Byte;
Begin
I := 0;
For I := 1 To 20 Do
Writeln(I*2);
End.
2.
Program Z2;
Var I: Byte;
Begin
For I := 50 To 100 Do
if (I and 1 = 0) Then
Writeln(I);
End.