М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
mathewkichunov
mathewkichunov
14.02.2021 23:45 •  Информатика

Дано трехзначное число, найди число сотен, десятков, единиц. Найди сумму цифр трехзначного числа. Найди произведение цифр трехзначного числа. ЯЗЫК PHYTON!

👇
Ответ:
01223
01223
14.02.2021

a = int(input())

b = a // 100

c = a // 10 % 10

d = a % 10

print(b + c + d)

print(b * c * d)

Объяснение:

4,5(17 оценок)
Открыть все ответы
Ответ:
Begin
  var a: integer;
  readln(a);
  for i: integer := 1 to abs(a) do
    if (a mod i = 0) then
      writeln('> ', i);
end.

function Simple(a: integer): boolean;
begin
  result := true;
  for i: integer := 2 to (a div 2) do
    if (a mod i = 0) then
     begin
      result := false;
      break;
    end;
end;

begin
  var a: integer;
  readln(a);
  writeln(Simple(a));
end.

var
  a: integer;

begin
  readln(a);
  for i: byte := length(a.ToString()) downto 1 do
    write(a.ToString()[i]);
end.

function Simple(a: integer): boolean;
begin
  result := true;
  for i: integer := 2 to (a div 2) do
    if (a mod i = 0) then
     begin
      result := false;
      break;
    end;
end;

function par(a: integer): string;
begin
  for i: byte := length(a.ToString()) downto 1 do
    result += a.ToString()[i];
end;

  
begin
  var a: integer;
  readln(a);
  for i: integer := 1 to abs(a) do
    if ((a mod i = 0) and (Simple(a)) and (par(a) = inttostr(i))) then
      writeln('> ', i);
end.
4,5(59 оценок)
Ответ:
nmigutsa
nmigutsa
14.02.2021

#include <iostream>

#include <Windows.h>

using namespace std;

void main()

{

                setlocale(LC_ALL, "Russian");

                float a, b, c;

Start:

                system("CLS");

                cout << "Введите 3 действительных числа:\n";

                cin >> a;

                cin >> b;

                cin >> c;

                if (a>b && a>c)

                               cout << "Вот что получится если удвоить ваши числа: " <<a*2<< b*2<<c*2<<"\n";

                else

                cout << "Заменяю ваши числа обсолютными значениями: " <<abs(a)<<abs(b)<<abs(c)<< "\n";

                Sleep(5000);

 

                goto Start;

}

4,6(87 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ