Категория
Информатика, опубликовано 17.03.2019 14:30

Напечатать в порядке убывания все цифры , входящие в запись данного натурального числа. паскаль.

Ответы

Ответ
Ответ оставил: Гость
Var st,s: string;     i,j: integer; begin   s: ='9876543210';   write('число:   ');   readln(st);   j: =1;   while j< =length(s) do   begin     i: =1;       while i< =length(st) do     begin       if st[i]=s[j] then         begin         write(s[j],' ');         delete(st,i,1);         i: =i-1;       end;       i: =i+1;     end;     j: =j+1;     if length(st)=0 then break;   end;   end.     
Ответ
Ответ оставил: Гость
Можна все удалить і збросить заводські настройки 
зажміть кнопку питания і повишитель звука 
Ответ
Ответ оставил: Гость
Тоже 2 это уши (вроде)
Ответ
Ответ оставил: Гость
1) 524 бит
2) 286720 бит
3) 204320 бит


Другие вопросы по информатике

✅ Ответов: 3 на вопрос по информатике: Напечатать в порядке убывания все цифры , входящие в запись данного натурального числа. паскаль.... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube