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

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

👇
Ответ:
demon998
demon998
27.01.2022
Если просят найти среднее арифметическое, то формула (a+b+c)/3.

Если не наибольшее и не наименьшее из трёх, то

if ((a < b) and (b < c)) or ((a > b) and (b > c)) then b
else if ((b < c) and (c < a)) or ((b > c) and (c > a)) then c
else a;

Предполагается, что a <> b <> c.
4,8(53 оценок)
Ответ:
настя7596
настя7596
27.01.2022
var
  i: integer;
  m: array [1..3] of integer;
begin
  writeln('Введите три числа: ');
  for i := 1 to 3 do
  begin
    read(m[i]);
     if odd(m[i]) then write('Число нечетно: ', m[i] * 2)
    else write('Число четно: ', m[i]);
    writeln;
  end;
end.
4,5(26 оценок)
Открыть все ответы
Ответ:
009095244554458
009095244554458
27.01.2022

1)36(10)=>(..)(8) Из 10 ой системы в любую другую мы переводим методом деления и остатки записываем в ответ

а)36/8=4 и 4 в остатке ответ 44(8)

б) следуя из задания а тут у нас отрицательное число следовательно будет -44(8)

в)106(10)=>(..)(8)

106/8=13 и 2 в остатке

13/2=1 и 5 в остатке ответ: 152(8)

г) -152(8)

2)a)00010100(2)=>(..)(10) Здесь мы работаем методом коэкоэфициентов

0*2^7+0*2^6+0*2^5+1*2^4+0*2^3+1*2^2+0*2^1+0*2^0=20(10)

ответ:20

б)11110110(2)=>(..)(10)

1*2^7+1*2^6+1*2^5+1*2^4+0*2^3+1*2^2+1*2^1+0*2^0=246(10)

ответ:246(

в) 00011100(2)=>(..)(10)

0*2^7+0*2^6+0*2^5+1*2^4+1*2^3+1*2^2+0*2^1+0*2^0=28(10)

ответ: 28

г) 10101100(2)=>(..)(10)

1*2^7+0*2^6+1*2^5+0*2^4+1*2^3+1*2^2+0*2^1+0*2^0=86(10)

ответ: 86

Объяснение:

4,4(39 оценок)
Ответ:
vlad77r
vlad77r
27.01.2022

C#

using System;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int n;

           bool b = false;

           Console.Write("Введите n: ");

           n = Convert.ToInt32(Console.ReadLine());

           int[] A = new int[n];

           Console.WriteLine("Введите массив: ");

           for (int i = 0; i < n; i++)

           {

               A[i] = Convert.ToInt32(Console.ReadLine());

               if (A[i] == 30) b = true;

           }

           Console.WriteLine("В массиве "+(b ? "есть" : "нет")+" числ"+ (b ? "о" : "а") + " 30");

       }

   }

}

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