1 שיעור

program Simple;
{
  The purpose of this program is to add two user-entered numbers, and
     to print out the sum.

                                                                                                                                            }
var {variable declaration statements}
  num1, num2, sum:integer;
begin { main body of program Simple }
   writeln('Enter two numbers: ');
   readln(num1);
   readln(num2);
   sum:=num1+num2;
   writeln('The sum is ",sum)
end. { End of program Simple }

program   s;
var   a,b,c:integer;
begin    read(a,b);    c:=a+b;    writeln(c)    end.

program    Exchange;
var price:integer;
begin
   read(price);
   writeln('Price in shekalim is ',price);
   writeln('Equivalent dollar value is ',3.7*price)
end.

   read(a,b);
   b:=1;
   c:=2;
   d:=3;
   read(c);

   k:=1;
   k:=k+k;
   k:=k+k;
   writeln(k);