В заданном натуральном числе поменять порядок цифр на обратный

@аринка · Регистрация: 06.06.2010

Author24 — интернет-сервис помощи студентам

1. Вычислить сумму 2/3+3/4+4/5+…+10/11.
2. Дана последовательность натуральных чисел. Если на четном месте находится элемент кратный 3, то заменить этот элемент на его квадрат. Полученную последовательность вывести.
3. В заданном натуральном числе поменять порядок цифр на обратный и сравнить по величине полученное число с исходным.

@Mad_Dog · 06.06.2010, 11:41

Первая

Pascal

S:=0;
for n:=2 to 10 do
  S:=S+n/(n+1);
writeln(S:5:2)

@Shelovek · 06.06.2010, 12:08

Pascal

uses
    crt;
var
   a:array[1..500] of integer;
   i,j,n,k:integer;
begin
     writeln('wvedite razmernost matrici');
     readln(n);
     writeln('wvedite matgricu ',n);
     for i:= 1 to n do
         read(a[i]);
     for i:= 1 to n do
         begin
              if (i mod 2=0) and (a[i] mod 3=0) then
                 a[i]:=sqr(a[i]);
         end;
for i:= 1 to n do
    write(a[i]:4);
readkey
end.

@кот Бегемот · 06.06.2010, 12:31

Сообщение от аринка

3. В заданном натуральном числе поменять порядок цифр на обратный и сравнить по величине полученное число с исходным.

Pascal

var
a,b,c:integer;
begin
readln (a);
c:=a;
repeat
b:=b*10+a mod 10;
a:=a div 10;
until a=0;
writeln(b);
if b>c then writeln('obratnoe bolshe')else if c>b then writeln('pryamoe bolshe')else writeln('odinakovye');
readln;
end.

@Inadequate · 06.06.2010, 12:36

кот Бегемот, нужно добавить переменную, потому как не с чем будет сравнивать.

@кот Бегемот · 06.06.2010, 12:51

не дочитал до конца условие. Исправил.

@аринка · 06.06.2010, 15:59 **[ТС]**

и еще к ним надо блок схемы

@аринка 0 / 0 / 0 Регистрация: 06.06.2010 Сообщений: 28
		1
	В заданном натуральном числе поменять порядок цифр на обратный 06.06.2010, 11:30. Показов 4070. Ответов 6 Метки нет (Все метки) 1. Вычислить сумму 2/3+3/4+4/5+…+10/11. 2. Дана последовательность натуральных чисел. Если на четном месте находится элемент кратный 3, то заменить этот элемент на его квадрат. Полученную последовательность вывести. 3. В заданном натуральном числе поменять порядок цифр на обратный и сравнить по величине полученное число с исходным. 0

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	06.06.2010, 12:36	5
	кот Бегемот, нужно добавить переменную, потому как не с чем будет сравнивать. 1

@кот Бегемот Платежеспособный зверь 8926 / 4354 / 1642 Регистрация: 28.10.2009 Сообщений: 11,568
	06.06.2010, 12:51	6
	не дочитал до конца условие. Исправил. 0

@аринка 0 / 0 / 0 Регистрация: 06.06.2010 Сообщений: 28
	06.06.2010, 15:59 [ТС]	7
	и еще к ним надо блок схемы 0