Scribd
Încărcați
106 vizualizări2 pagini

Pascal

Documentul prezintă două probleme de programare liniară. Prima problemă cere să se găsească cinci numere consecutive, cu numărul din mijloc ales de utilizator. A doua problemă calculează suma rămasă după achiziționarea unui nou automobil, ținând cont de prețul mașinii vechi și al celei noi, precum și de suma disponibilă.

Încărcat de

Andriana vorotna
Drepturi de autor
© All Rights Reserved
Respectăm cu strictețe drepturile privind conținutul. Dacă suspectați că acesta este conținutul dumneavoastră, reclamați-l aici.
Formate disponibile
Descărcați ca DOCX, PDF, TXT sau citiți online pe Scribd
106 vizualizări2 pagini

Pascal

Documentul prezintă două probleme de programare liniară. Prima problemă cere să se găsească cinci numere consecutive, cu numărul din mijloc ales de utilizator. A doua problemă calculează suma rămasă după achiziționarea unui nou automobil, ținând cont de prețul mașinii vechi și al celei noi, precum și de suma disponibilă.

Încărcat de

Andriana vorotna
Drepturi de autor
© All Rights Reserved
Respectăm cu strictețe drepturile privind conținutul. Dacă suspectați că acesta este conținutul dumneavoastră, reclamați-l aici.
Formate disponibile
Descărcați ca DOCX, PDF, TXT sau citiți online pe Scribd

STRUCTURA LINIARĂ

3. Ion și Vasile joacă următorul joc: Ion spune un număr, iar Vasile trebuie să găsească cinci numere consecutive,
crescătoare, numărul din mijloc fiind cel ales de Ion. Ajutați-l pe Vasile să găsească răspunsul mai repede.

Exemplu: Ion spune 10, Vasile spune 8 9 10 11 12.

Program Joc;
var a,b,c,d,e:integer;
begin
writeln ('Introdu numarul');
readln (c);
b:=pred(c);
a:=pred(b);
d:=succ(c);
e:=succ(d);
writeln ('Sirul obtinut este: ',a,' ',b,' ',c,' ',d,' ',e);
readln;
end.

15. O familie a hotărât să schimbe vechiul său automobil pe unul nou. Prețul cu care
poate fi vândut automobilul vechi este N lei, suma de pe contul bancar al familiei este de
K lei. Luând în considerație că suma de care dispune familia este mai mare decât prețul
automobilului nou și prețul acestuia este de X lei, să se determine ce sumă de bani va
avea
familia după procurarea automobilului.

Program automobile;
var n,K,x:word;
s:word;
begin
writeln('Introdu n');
readln(n);
writeln('Introdu K');
readln(K);
writeln('Introdu x');
readln(x);
s:=(n*K)-x;
writeln(s);
end.
15.Să se elaboreze un program care să citească de la tastatură două numere întregi, să
verifice dacă primul număr este predecesorul celui de al doilea număr și să afișeze
mesaje corespunzătoare.
Exemplu: pentru 3 5 se va afișa “primul numar nu este predecesorul celui de al doilea”
pentru 5 6 se va afișa “primul numar este predecesorul celui de al doilea”

S-ar putea să vă placă și