Fix 2022 misidentified day0
This commit is contained in:
Binary file not shown.
Binary file not shown.
@@ -1 +0,0 @@
|
||||
4
|
||||
@@ -1 +0,0 @@
|
||||
24
|
||||
@@ -1,21 +0,0 @@
|
||||
Program Factorial;
|
||||
var n, i : integer;
|
||||
F : longint;
|
||||
Intrare, Iesire : text;
|
||||
label 1;
|
||||
begin
|
||||
{ Citirea datelor de intrare }
|
||||
assign(Intrare, 'fact.in');
|
||||
reset(Intrare);
|
||||
readln(Intrare, n);
|
||||
close(Intrare);
|
||||
{ Calcularea factorialului }
|
||||
F:=1;
|
||||
if n=0 then goto 1;
|
||||
for i:=1 to n do F:=F*i;
|
||||
1: { Scrierea datelor de iesire }
|
||||
assign(Iesire, 'fact.out');
|
||||
rewrite(Iesire);
|
||||
writeln(Iesire, F);
|
||||
close(Iesire);
|
||||
end.
|
||||
Binary file not shown.
Binary file not shown.
@@ -1,2 +0,0 @@
|
||||
5
|
||||
|
||||
@@ -1 +0,0 @@
|
||||
120
|
||||
@@ -1,2 +0,0 @@
|
||||
7
|
||||
|
||||
@@ -1 +0,0 @@
|
||||
5040
|
||||
@@ -1 +0,0 @@
|
||||
8
|
||||
@@ -1 +0,0 @@
|
||||
40320
|
||||
@@ -1 +0,0 @@
|
||||
6
|
||||
@@ -1 +0,0 @@
|
||||
720
|
||||
@@ -1,3 +0,0 @@
|
||||
12
|
||||
|
||||
|
||||
@@ -1 +0,0 @@
|
||||
479001600
|
||||
Binary file not shown.
Binary file not shown.
@@ -1,4 +0,0 @@
|
||||
3
|
||||
5
|
||||
-7
|
||||
23
|
||||
@@ -1 +0,0 @@
|
||||
21
|
||||
@@ -1,22 +0,0 @@
|
||||
Program Suma;
|
||||
var n, i, S : integer;
|
||||
A : array[1..100] of integer;
|
||||
Intrare, Iesire : text;
|
||||
begin
|
||||
{ Citirea datelor de intrare }
|
||||
assign(Intrare, 'suma.in');
|
||||
reset(Intrare);
|
||||
readln(Intrare, n);
|
||||
for i:=1 to n do
|
||||
readln(Intrare, A[i]);
|
||||
close(Intrare);
|
||||
{ Calcularea sumei }
|
||||
S:=0;
|
||||
for i:=1 to n do
|
||||
S:=S+A[i];
|
||||
{ Scrierea datelor de iesire }
|
||||
assign(Iesire, 'suma.out');
|
||||
rewrite(Iesire);
|
||||
writeln(Iesire, S);
|
||||
close(Iesire);
|
||||
end.
|
||||
@@ -1,3 +0,0 @@
|
||||
1
|
||||
100
|
||||
|
||||
@@ -1 +0,0 @@
|
||||
100
|
||||
@@ -1,3 +0,0 @@
|
||||
2
|
||||
100
|
||||
100
|
||||
@@ -1 +0,0 @@
|
||||
200
|
||||
@@ -1,3 +0,0 @@
|
||||
2
|
||||
100
|
||||
-100
|
||||
@@ -1 +0,0 @@
|
||||
0
|
||||
@@ -1,11 +0,0 @@
|
||||
10
|
||||
1
|
||||
2
|
||||
3
|
||||
4
|
||||
5
|
||||
6
|
||||
7
|
||||
8
|
||||
9
|
||||
10
|
||||
@@ -1 +0,0 @@
|
||||
55
|
||||
@@ -1,11 +0,0 @@
|
||||
10
|
||||
-1
|
||||
-2
|
||||
-3
|
||||
-4
|
||||
-5
|
||||
-6
|
||||
-7
|
||||
-8
|
||||
-9
|
||||
10
|
||||
@@ -1 +0,0 @@
|
||||
-35
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
@@ -1,2 +0,0 @@
|
||||
e
|
||||
Rezolvarea problemelor complexe este imposibila fara cunoasterea tehnicilor de programare
|
||||
@@ -1 +0,0 @@
|
||||
13
|
||||
@@ -1,2 +0,0 @@
|
||||
r
|
||||
Programarea modulara are mai multe avantaje
|
||||
@@ -1 +0,0 @@
|
||||
5
|
||||
@@ -1,2 +0,0 @@
|
||||
a
|
||||
Prelucrarea textelor este o munca migaloasa
|
||||
@@ -1 +0,0 @@
|
||||
6
|
||||
@@ -1,2 +0,0 @@
|
||||
8
|
||||
8984723hnd010-23nnoj98483924h928312`--knx209893n1-1-`1219jjj2109jw029jdm
|
||||
@@ -1 +0,0 @@
|
||||
6
|
||||
@@ -1,2 +0,0 @@
|
||||
1
|
||||
1111111111222221111111111aaaaa1111111111bbbbb111111111111111111111
|
||||
@@ -1 +0,0 @@
|
||||
51
|
||||
@@ -1,2 +0,0 @@
|
||||
m
|
||||
Olimpiada Raionala / Municipala la Informatica 2022
|
||||
@@ -1 +0,0 @@
|
||||
2
|
||||
@@ -1,25 +0,0 @@
|
||||
Program Texte;
|
||||
var N : integer;
|
||||
C : char;
|
||||
T : string;
|
||||
Intrare, Iesire : text;
|
||||
L : integer; { lungimea textului T }
|
||||
i : integer; { contor penru parcurgerea textului T }
|
||||
begin
|
||||
{ Citirea datelor de intrare }
|
||||
assign(Intrare, 'texte.in');
|
||||
reset(Intrare);
|
||||
readln(Intrare, C);
|
||||
readln(Intrare, T);
|
||||
close(Intrare);
|
||||
{ Calcularea numarului de aparitii }
|
||||
N:=0;
|
||||
L:=length(T);
|
||||
for i:=1 to L do
|
||||
if C=T[i] then N:=N+1;
|
||||
{ Scrierea datelor de iesire }
|
||||
assign(Iesire, 'texte.out');
|
||||
rewrite(Iesire);
|
||||
writeln(Iesire, N);
|
||||
close(Iesire);
|
||||
end.
|
||||
Reference in New Issue
Block a user