Написать программу, образует с цифр трехзначного числа больше трехзначное число...

August 2022 1 3 Report

Написати програму, що утворює із цифр тризначного числа найбільше тризначне число/Написать программу, образует с цифр трехзначного числа больше трехзначное число

Answers & Comments

21sadtylers Var x,n,a,b,c,y:integer;
begin
readln(x);
a:=0;
b:=0;
c:=0:
while x>0 do
begin
n:=x mod 10;
if n>a then
begin
c:=b;
b:=a;
a:=n
end
else
if n>b then
begin
c:=b;
b:=n
end
else c:=n;
x:=x div 10
end;
y:=a*100+b*10+c;
writeln(y)
end.

0 votes Thanks 0

Answers & Comments

dano 3 chisel v paskali treba napisati program shob chisla jshli u poryadku zrostannya

dano nlt999 vrahovuyuchi 3 chisla viznachiti sho pravilno mistit 1 usi rizni c

napisat programmu v paskale chto vychislyaet proizvedenie pervuyu desyatku naturaln

porivnyalna gospodarska ocinka prirodnih umov ta resursiv prirodnih zon yih vpli

1ukazhite oshibku esli takovaya imeet mesto v fragmente programmy po kotorym na

prikladi dilnosti bankufirmi ta poserednikovoyi ustanovi

viznachiti stupeni okisnennya elementiv u spolukahduzhe treba k20 co2 n2o n2

4 umnozhit koren iz 3 razdelit na 2

napisati programu yaka bude zpituvati imya ta vivoditi na ekran privit imya kor

2?...

рекомендуемые вопросы

Helpful Links

Helpful Social