👤
a fost răspuns

Ajutor! Vreau aceste probleme rezolvate cu algoritm cu tot tot pana la sfarsit. Raman recunoscător!

1. Se dau doua numere intregi. Sa se determine suma si diferenta lor.

2. Se dau doua numere naturale. Sa se determine media aritmetica si media geometrica a acestor numere.

3. Se da raza unui cerc. Sa se afle lungimea cercului si aria discului marginit de acest cerc.

Răspuns :

ENCARAJASLAVIK814

Răspuns:

1.

var a,b,c,d: Integer;

begin

readln(a,b);

s:= a + b; Writeln(' Suma: ' ,s);

d:= a - b; Writeln(' Diferenta: ' ,d);

end.

2.

var a,b,ma,mg: Real;

begin

readln(a,b);

ma:= (a + b) / 2; writeln(' Media aritmetica: ',ma);

mg:= sqrt(a * b); Writeln('Media geometrica: ',mg);

end.

3.

var a,r,L: Real;

const pi = 3.14;

begin

readln(r);

l:= 2 * pi * r;

writeln(' Lungimea este: ' ,l:1:2);

end.

Explicație:

da mi si mie 5 stele nu fi zgarcit

Vă mulțumim că ați ales să vizitați site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, vă rugăm să ne contactați. Revenirea dumneavoastră ne va bucura, iar pentru acces rapid, nu uitați să ne salvați la favorite!


En Trainingsy: Alte intrebari