сервис вопросов и ответов1. Дано натуральное число n. Переставить его цифры так, чтобы образовалось максимальное число, записанное теми же цифрами.
10-11 класс|
|
2. Найти все двузначные числа, сумма квадратов которых делится на 17.
Всё это нужно сделать в программе Паскаль, но КАК?!
Viktorrrr
30 июня 2014 г., 9:00:27 (9 лет назад)
Sheriarty
30 июня 2014 г., 10:25:16 (9 лет назад)
1. uses crt;
const m=8;
var n,i,b,c,p,k:integer;
a:array[1..m] of integer;
begin
readln(n);
b:=n;
k:=1;
repeat
c:=b mod 10;
a[k]:=c;
b:=b div 10;
inc(k);
until b=0;
repeat
p:=0;
for i:=1 to k-1 do
if a[i]<a[i+1] then
begin
p:=1;
a[i]:=a[i]+a[i+1];
a[i+1]:=a[i]-a[i+1];
a[i]:=a[i]-a[i+1];
end;
until p=0;
for i:=1 to k-1 do
write(a[i]);
end.
2. uses crt;
const n=99;
var i,j:integer;
begin
for i:=10 to n do
for j:=10 to n do
if ((i*i+j*j)mod 17=0) then write(i,' ',j,' ');
end.
Саюри123456
30 июня 2014 г., 11:42:09 (9 лет назад)
во втором задании непонятно: попарно перебирать все двузначные числа или в одном числе рассматривать его цифры?
Ответить
Другие вопросы из категории
500 !!!! Доклад на тему:"Облачные-
технологии и их применение на практике" 11 класс (пожалуйста, хорошая работа нужна)
Какая маска соответствует сети класса C
1) 255.255.0.0
2) 255.255.255.0
3) 255.0.0.0
Читайте также
Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
1.Дано натуральное число:
a) найти произведение цифр числа б) верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)
2. Найти все трехзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.
3.Из данного натурального числа удалить все цифры А (а вводятся с клавиатуры).
Написать программы в паскале и желательно блок-схему, но можно и без нее.
Помогите пожалуйста)
1.дано натурально четырехзначное число. определить цифры этого числа (K,L.M.N) и выяснить можно ли построить ромб со сторонами K,L.M.N.в паскале АВС.
2.дано натурально число N вычислить куб суммы этого числа
Вы находитесь на странице вопроса "1. Дано натуральное число n. Переставить его цифры так, чтобы образовалось максимальное число, записанное теми же цифрами.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.