👤
a fost răspuns

In PASCAL dau COROANA! Sa se afle numerele de doua cifre care impartite la 15 dau restul egal cu patratul citului.

Răspuns :

Var x:integer;
begin
 
writeln('x='); readln(x);

while(9<x) and (x<91) do
begin;
if( x mod 15=sqr(x div 15)) THEN
writeln('Numarul indeplineste conditia')
else writeln('Numarul nu indeplineste conditia');
end;
readln;
end.
Vă mulțumim că ați vizitat platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Așteptăm cu nerăbdare să vă revedem și nu uitați să ne salvați în lista de favorite!


Ez Askings: Alte intrebari