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

Дан целочисленный массив из 10 элементов. напишите программу, которая находит количество пар элементов массива, в которых хотя бы одно число делится на 3, под парой подразумевается два идущих подряд массива. например : 6; 2 ; 9; -3; 6. ответ : 4. работа в паскаль,

👇
Ответ:
Alyona2022
Alyona2022
26.05.2020
Извиняюcь за то что долго
program z1;
var a:array[10];
k,i:integer;
begin
k:=0;
readln(a);
for i:= 1 to 9 do
if (a[i] mod 3 =0) or (a[i+1] mod 3 = 0) then k:=k+1;
end;
writeln(k);
end.
4,7(22 оценок)
Открыть все ответы
Ответ:
Dashka2K17
Dashka2K17
26.05.2020

удачи вам

Объяснение:

Линия (Line) – при перемещении курсора в любом направлении Контрольная панель информирует о ее текущей длине в виде.

Дуга (Аrc) – при перемещении курсора от начальной точки VCB вначале информирует о текущей длине хорды. Для назначения нужной длины вводим свое значение. Можно также назначить количество сегментов, образующих дугу вводом значения.

Прямоугольник (Rectangle) – при перемещении курсора от начального угла к диагонально расположенному конечному VCB информирует о длинах сторон прямоугольника.

Окружность (Circle) и Многоугольник (Polygon) – при перемещении курсора от назначенного центра окружности VCB информирует о текущей величине радиуса. Можно переназначить эту величину непосредственно после завершения построения .

Перемещение (Move) – при перемещении элемента инструментом VCB работает с величинами смещения точно так же, как и в инструменте Линия (Line). Но, кроме того, очень удобно применять VCB для управления созданием копий, которые появляются при перемещении с нажатой клавишей Ctrl.

Вращение (Rotate) – в принципе, здесь все приемы работы с VCB аналогичны инструменту Перемещение (Move), только они применяются к величинам углов поворота (Angle).

Масштаб (Scale) – здесь VCB показывает текущие (и, естественно, можно назначить свои) коэффициенты масштабирования, а также подсказывает по каким осям это одновременно происходит.

Тянуть/Толкать (Push/Pull) и Контур (Offset) – поскольку здесь также речь идет о дистанции перемещения, VCB работает с этими величинами, как и в инструменте Линия (Line).

Лупа (Zoom) – здесь VCB показывает текущую (и, естественно, можно переназначить свою) величину угла обзора (поля зрения) камеры в градусах.

4,6(96 оценок)
Ответ:
MADHOP2016
MADHOP2016
26.05.2020

C++:

#include <iostream>

#include <windows.h>

#include <time.h>

using namespace std;

struct Person

{  

   string canGoOutside(int age, float temperature)

   {

       if(age >= 20 && age <= 45 && temperature >= -20 && temperature <= 30)

           return "Можно идти гулять";

       else if(age < 20 && temperature >= 0 && temperature <= 28)

           return "Можно идти гулять";

       else if(age > 45 && temperature >= -10 && temperature <= 25)

           return "Можно идти гулять";

       else

           return "Отсавайтесь дома";

   }

   int generateRandomAge(int min, int max){

       return min + rand() % (max + 1 - min);

   }

};

int main()

{

   SetConsoleCP(65001);

   SetConsoleOutputCP(65001);

   srand(time(NULL));

   Person Adolf;

   cout << Adolf.canGoOutside(15, 15) << endl;

   cout << Adolf.canGoOutside(73,5) << endl;

   cout << Adolf.canGoOutside(36, -10) << endl;

   cout << Adolf.canGoOutside(19, -25) << endl;

   cout << endl;

   

   cout << Adolf.canGoOutside(Adolf.generateRandomAge(5, 65), -5) << endl;

   cout << Adolf.canGoOutside(Adolf.generateRandomAge(5, 65), 10) << endl;

   cout << Adolf.canGoOutside(Adolf.generateRandomAge(5, 65), 0) << endl;

   cout << Adolf.canGoOutside(Adolf.generateRandomAge(5, 65), 40) << endl;

   return 0;

}

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