Question

1) Scrieţi o expresie care furnizează rezultatul True dacă cel puţin una din variabilele întregi a, b, c este divizibilă cu 7, sau furnizează rezultatul False dacă toate cele trei variabile nu sunt divizibile cu 7.
2) Scrieţi un algoritm care citeşte un număr natural n şi tipăreşte produsul dintre cifra zecilor şi cifra sutelor. De exemplu, dacă n=247, atunci se va tipări 8, iar dacă n=29, atunci rezultatul este 0, pentru că cifra sutelor este 0.
5) Scrieţi o expresie care furnizează rezultatul True dacă variabilele întregi x, y, z dau resturi diferite prin împărţire la 5, sau furnizează rezultatul False dacă cel puţin două din variabile dau acelaşi rest prin împărţire la 5.
In pseudocod , multumesc , am nevoie urgenta.

Answer 1

1.
Program Augustin;
a,b,c:integer;
x:boolean;
begin
Writeln('Introdu a,b,c');
readln(a,b,c);
x:=False;
if a mod 7=0 then x:=True;
if b mod 7=0 then x:=True;
if c mod 7=0 then x:=True;
Writeln(x);
readln;
end.