Архивы рубрики: Информатика

Даны числа A и В. Вычислить произведение P = 3*A+1*B·4*A+2*B· …· 53*A+51*B. Решение задачи в Паскале

Даны числа A и В. Вычислить произведение  P = (3*A+1*B)·(4*A+2*B)· …· (53*A+51*B).

Решение задачи в Паскале

  • var a,b,ml,i:longint;
    begin
    readln(a);
    readln(b);
    ml:=1;
    for i:=1 to 51 do begin
         ml:=ml*((i+2)*a+i*b);
         // можно тут добавить чтобы увидеть writeln(ml);
    end;
    writeln(ml);
    end.

    ну код будет выглядеть примерно так, но вместо обычного умножения должно быть длинное. Даже для маленьких значений не работает тк выходит за ограничения на логинт

Цифры натурального числа поместить в массив в том же порядке, в каком они записаны в числа. турбо Паскаль

Цифры натурального числа поместить в массив в том же порядке, в каком они записаны в числа. ( турбо Паскаль)

  • var j,n,i:longint;     
         a,b:array [1..1000] of integer;
    begin         
             readln(n);// считываем число         
             i:=1;// начинаем с первого элемента массива
             while (n>0) do //пока n больше нуля
             begin
                    a[i]:=n mod 10;  //тем самым выбираем последнюю цифру числа
                    n:=n div 10; // откидываем последнюю цифру
                    i:=i+1;// следующий элемент массива
             end;
                    // по окончании в массиве a будет храниться наше число только
                   // в обратном порядке
             i:=i-1;// теперь i равно длине числа +1 поэтому отнимаем 1
             for j:=i downto 1 do // с конца массива а до 1
             begin
                    b[i-j+1]:=a[j]; // заполняем b в обратном порядке
             end;
             //теперь в массиве b хранится наше число в нужном порядке
             for j:=1 to i do
             begin
                           write(b[j],' ');
             end;
    end.

Дано натуральное число n. Найти все меньшие n простые числа, которые могут быть представлены в виде 2^p-1, где p – тоже простое число. ABC Pas

 

1.      Дано натуральное число n. Найти все меньшие n простые числа, которые могут быть представлены в виде 2^p-1, где p- тоже простое число.( ABC Pascal)

  • uses
        System.Collections.Generic,
        System;

    var
        simple: List<integer> := new List<integer>;
        i, n, p: integer;
        m: longint;

    begin
        read(n);
        for i := 2 to n do
        begin
            m := 1;
            foreach s: integer in simple do
                m := m * i mod s;
            if m > 0 then begin
                simple.Add(i);
    //            write(i, ' ');
            end;
        end;
        writeln();
       
        foreach s: integer in simple do
        begin
            if Math.Pow(2, s) - 1 <= longint.MaxValue then begin
                m := round(Math.Pow(2, s) - 1);
                if (m <= n) and simple.Contains(m) then
                    write(m, ' ');
            end;
        end;
    end.

С паскалем Составить программу, которая бы по последней цифре многозначного числа выдавала бы одно из сообщений:число не делится ни на 2, н

Помогите с паскалем
3. Составить программу, которая бы по последней цифре многозначного числа выдавала бы одно из сообщений:
число не делится ни на 2, ни на 5
число делится только на 2
число делится только на 5
число делится и на 2, и на 5.

  • var a:string;
    b:integer;
    begin
    readln(a);
    b:=strtoint(a[length(a)]);
    if (b mod 2 <> 0) and (b mod 5 <> 0) then writeln('число не делится ни на 2, ни на 5');
    if (b mod 2 = 0) and (b mod 5 <> 0) then writeln('число делится только на 2');
    if (b mod 2 <> 0) and (b mod 5 = 0) then writeln('число делится только на 5');
    if (b mod 2 = 0) and (b mod 5 = 0) then writeln('число делится и на 2, и на 5');
    end.

! ! В каждом из следующих пунктов перечислины объекты, сгруппированные по некоторому признаку. Определите эти признаки:а

Помогите пожалуйста! Нужно срочно!)))
В каждом из следующих пунктов перечислины объекты, сгруппированные по некоторому признаку. Определите эти признаки:
а) приставка, корень, суффикс, окончание
б) подлежащее, сказуемое, определение, дополнение
в) глагол, существительное, прилагательное, местоимение
г) отрезок, круг, квадрат, треугольник
д) сканер, клавиатура, мышь, джойстик
е) хранение, передача, обработка

  • А. Орфограмма
    Б. Части речи
    В. Не помню
    Г. Геометрические фигуры
    Д. Компьютерные приборы
    Е. Информация

А. Крылова “Волк и ягненок” Приведите строки басни, подтверждающие вашу мысль

А. Крылова "Волк и ягненок" Приведите строки басни, подтверждающие вашу мысль.

  • Перед нами пример авторитарного стиля отношений. С одной стороны Волк как олицетворение Силы и с другой стороны Ягненок как олицетворение Слабости. Сила Волка дает ему хоть и незаконную но власть над бедным ягненком. Но чтобы придать своим действиям хоть какую-то видимость закона Волк говорит об обстоятельствах которые усугубляют вину несчастного Ягненка. Можно сказать что эти отношения являются характерными для России когда у одних в руках сила власть и богатство а у других - только малость самого необходимого. Вдобавок потенциальная возможность у слабых стать в том или ином роде пищей для обладателей Власти.
    У сильного всегда бессильный виноват:
    Тому в Истории мы тьму примеров слышим,
    Но мы Истории не пишем;    
    А вот о том как в Баснях говорят.   
    Ягненка видит он, на до́бычу стремится;
    Но, делу дать хотя законный вид и толк,
    Вы сами, ваши псы и ваши пастухи,
    Вы все мне зла хотите,     
    И если можете, то мне всегда вредите:
    Но я с тобой за их разведаюсь грехи». —
    Ты виноват уж тем, что хочется мне кушать» .

! Злая мачеха отправила падчерицу к роднику за водой. “Вот тебе 2 ведра, в одной из них входит 9 литров воды, а в другое 5 литров. Но ты должна

Помогите!
Злая мачеха отправила падчерицу к роднику за водой. "Вот тебе 2 ведра, в одной из них входит 9 литров воды, а в другое 5 литров. Но ты должна принести домой ровно три литра воды" , сказала она бедной девушке. Как должна действовать падчерица, чтобы выполнить это поручение?

  • 1)набрать меньшее ведро тогда у нас:
      0 и 5
    2)перелить из меньшего в большее до предела тогда у нас:
      5 и 0 
    3)набрать меньшее ведро тогда у нас:
      5 и 5
    4)перелить из меньшего в большее до предела тогда у нас:
      9 и 1
    5)вылить всё из большего и перелить туда всё из меньшего тогда у нас:
      1 и 0
    6)полностью набрать меньшее и перелить всё в большее тогда у нас:
      6 и 0
    7)вылить половину из большего тогда у нас:
      3 и 0
    Итог: 3 литра за 7 шагов.

В вашем распоряжении имеются два кувшина ёмкостью 3 и 8 литров. Как с помощью только этих кувшинов набрать из реки 7 литров воды ? Опишите возможный п

в вашем распоряжении имеются два кувшина ёмкостью 3 и 8 литров. Как с помощью только этих кувшинов набрать из реки 7 литров воды ? Опишите возможный план действий.

  • набираем 3 литра и выливаем в 8 литровый

    повторяем это два раза

    в 8 литровом сейчас 6 литров

    в третий раз набираем 3 литровый - выливаем в 8 литровый

    туда поместится лишь 2 литра, значит 6 + 2

    1 литр остается в 3 литровом

    сливаем воду из 8 литрового

    выливаем туда 1 литр, который остался в 3 литровом и 2 раза заливаем в

    8 литровый (каждый по 3 литра)

    получилось, что 3 + 3 + 1 = 7