Programmeerimise arvestustöö
5
@
õ
12.4
3. Kuidas näeksid Pascalis välja järgmised loogikatehted? (A, B ja C on tüüpi integer). (2 p)
A on väiksem kui 30, B on suurem kui 15 ja C ei võrdu 0-ga.
B on suurem kui 6 ja väiksem kui 10 või A on suurem kui 10
4. Kuidas näeksid Pascalis välja järgmised omistustehted? (6 p)
a = 3x 2
a=5 x
x -3 + 2
a=
y
a = e3x
a = x 2 - 12
d = a2 + b2
5. Leia programmi lähtekoodist vead. (5 p)
programm kolmarvu2;
var a, c: integer;
begin
writeln('See programm leiab kolmest täisarvust suurima);
write('Sisesta a: ');
readln(a);
write('Sisesta b: ');
readln(b);
write('Sisesta c: ');
readln(c);
if (a>b) and (a>c) then
writeln('Suurim on ',a);
if (b>a) and (b>c) then
writeln('Suurim on ',b);
if (c>a) and (c>b) then
writeln('Suurim on ',c);
if (a:=b) and (b=c) then
writeln('Arvud on võrdsed');
readln;
6