5100 в 10-тичной = 13EC в 16-ричной
Program x2;
var n:integer;
begin
Write('Введите n, n = ');
Readln(n);
Writeln('Сумма 1-ой и 4-ой цифр = ',n div 10000 + (n mod 100) div 10,' , произведение 2-ой и 5-ой = ', ((n mod 10000) div 1000) * (n mod 10)); // это продолжение строчки сверху
<span>end.</span>
Ответ:
#include <iostream>
int main()
{
float Number[10];
for (int i = 0; i < 10; i++) {
std::cin >> Number[i];
}
for (int i = 0; i < 10; i++) {
for (int j = 0; j < 10; j++) {
if (Number[i] < Number[j]) {
float temp = Number[j];
Number[j] = Number[i];
Number[i] = temp;
}
}
}
for (int i = 0; i < 10; i++) {
std::cout << Number[i] << "\t" ;
}
return 0;
}
Объяснение:
Работает правильно, но возможно был допущен недочёт в алгоритме, для сортировки использовал пузырьковую сортировку.
Решение для Pascal.
Запускаем цикл от 0 до 9 (всего 10 повторений - 10 чисел) и каждый повтор берём число n := 2*i + 1, которое будет гарантированно нечётным. Затем выводим само число и его куб
var
r,h,s:real;
begin
Read(r);
h:=2*Pi*r;
s:=2*pi*sqr(r);
Writeln('Площадь круга: ', S:5:2);
Writeln('Периметр окружности: ', h:5:2);
end.