You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
358 B
Plaintext
16 lines
358 B
Plaintext
{ This program tries some logic statements }
|
|
program logic;
|
|
|
|
var x, z : integer;
|
|
var xs : array [1 .. 10] of integer;
|
|
var y : real;
|
|
var ys : array [1 .. 10] of real;
|
|
|
|
begin
|
|
readln(x, xs[1], y, ys[1]);
|
|
if x < 10 and xs[1] < 1 or not(y > 0 and ys[1] >= 3 and y < 2.3 and ys[1] < 3.3) then
|
|
z := 100
|
|
else
|
|
z := 999;
|
|
writeln(z)
|
|
end. |