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

Написать программы по программированию (pascal abc). обязательно решать с использованием процедур. 1. написать программу, которая циклически сдвигает массив вправо или влево на указанное число позиций. сдвиг должен быть кольцевым. 2. написать программу перевода числа x из в . запрос числа х, основания n и вывод результата в основной программе, а перевод в процедуре.

👇
Ответ:
gevorpilot
gevorpilot
28.06.2022
1)//Вправо
Const
 n=10;

type
 ty=array[1..n] of integer;

var
 ar:ty;
 i,k:integer;

 procedure push(var ar:ty);
var
 i,c:integer;
begin
 c:=ar[n];
 for i:=n downto 2 do
 ar[i]:=ar[i-1];
 ar[1]:=c;
end;

 begin
 randomize;
 writeln('Enter K:');
 readln(k);
 writeln('First array:');
  for i:=1 to n do
   begin;
    ar[i]:=random(10);
    write(ar[i]:4);
   end;
  for i:=1 to k do
  push(ar);
 writeln;
 writeln('Final array:');
  for i:=1 to n do
   write(ar[i]:4);
end.
2)var
 a,i,b,r,n:integer;
 s,se:string;

procedure preob(var a,b,n:integer; var se:string);
 begin
  repeat
   b:=a mod n;
   a:=a div n;
   str(b,se);
   s+=se;
  until (a<=n-1);
 end;

begin
readln(a);
readln(n);
preob(a,b,n,se);
str(a,se);
s+=se;
for i:=1 to length(s) div 2 do
begin;
se:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=se[1];
end;
val(s,r,a);
write(r);
end.
4,7(11 оценок)
Открыть все ответы
Ответ:
юлик011084
юлик011084
28.06.2022

Вот, нашел на одном из сайтов: #include <iostream>

#include <conio.h>

#include <cstdlib>

#include <ctime>

using namespace std;

int main (){

   srand(time(0));

   int n, one, two, co=0, ol, k=0, var, sum1=0, sum2=0;

   bool kto=true;

   cout << "Privet davaii sigraem v kosti.\nPobedit tot u kogo suma 3 broskov budet bolshe\n\n";

   while (k<3)

   {

       cout << "\n1 - Brositj kubik\n2 - Vijti\nViberi variant: ";

       cin >> var;

       if (var==1)

       {

           for (int j=0; j<=1; j++)

               {

                   one=1+(rand()%6);

                   two=1+(rand()%6);

                   cout << "\n";

                   if (kto) cout << "\tTvoi kubiki\n";

                   if (!kto) cout << "\tMoi kubiki\n";

                   cout << "\n";

                   for (int i=1; i<=5; i++)

                   {

                           if (i==1) n=1;

                           else if (i==2 && one==1) n=2;

                           else if (i==2 && one==3 || i==2 && one==2) n=3;

                           else if (i==2 && one==4 || i==2 && one==5 || i==2 && one==6) n=4;

                           else if (i==3 && one==3 || i==3 && one==1 || i==3 && one==5) n=5;

                           else if (i==3 && one==2 || i==3 && one==4) n=2;

                           else if (i==3 && one==6) n=4;

                           else if (i==4 && one==1) n=2;

                           else if (i==4 && one==3 || i==4 && one==2) n=6;

                           else if (i==4 && one==4 || i==4 && one==5 || i==4 && one==6) n=4;

                           else if (i==5) n=7;

                       switch (n){

                           case 1:

                           cout << (char)201 << (char)205  << (char)205 << (char)205 << (char)205 << (char)205 << (char)205 << (char)205 << (char)187;

                           break;

                           case 2:

                           cout << (char)186 << "       " << (char)186;

                           break;

                           case 3:

                           cout << (char)186 << " o     " << (char)186;

                           break;

                           case 4:

                           cout << (char)186 << " o   o " << (char)186;

                           break;

                           case 5:

                           cout << (char)186 << "   o   " << (char)186;

                           break;

                           case 6:

                           cout << (char)186 << "     o " << (char)186;

                           break;

                           case 7:

                           cout << (char)200 << (char)205 << (char)205 << (char)205 << (char)205 << (char)205 << (char)205 << (char)205 << (char)188;

                           break;

                       }

                       if (co%2==0) {

                           cout << "\t";

                           i--;

                           ol=one;

                           one=two;}

                       else {

                           cout << endl;

                           one=ol; }

                   co++;

                   }

                   if (kto){

                       sum1=sum1+one+two;

                       kto=false;

                       continue;

                   }

                   if(!kto){

                       sum2=sum2+one+two;

                       kto=true;

                   }

               }

           }

           else if (var==2) return 0;

           else {

               cout << "\n!!! Viberi variant 1 ili 2 !!!\n";

               continue;}

               k++;

   }

   cout << "\nTvoj rezultat = " << sum1 << endl << "Moj rezultat = " << sum2 << endl;

   if (sum1>sum2)

       cout << "\n\tTi pobedil ;)";

   else cout << "\n\tTi proigral :(";

   getch ();

}

4,6(59 оценок)
Ответ:
Viktorua10
Viktorua10
28.06.2022

КАК СОЗДАТЬ ТАБЛИЦУ В EXCEL ДЛЯ ЧАЙНИКОВ

Работа с таблицами в Excel для чайников не терпит спешки. Создать таблицу можно разными и для конкретных целей каждый обладает своими преимуществами. Поэтому сначала визуально оценим ситуацию.

Посмотрите внимательно на рабочий лист табличного процессора:

Электронная таблица.

Это множество ячеек в столбцах и строках. По сути – таблица. Столбцы обозначены латинскими буквами. Строки – цифрами. Если вывести этот лист на печать, получим чистую страницу. Без всяких границ.

Сначала давайте научимся работать с ячейками, строками и столбцами.

Как выделить столбец и строку

Чтобы выделить весь столбец, щелкаем по его названию (латинской букве) левой кнопкой мыши.

Выделить столбец.

Для выделения строки – по названию строки (по цифре).

Выделить строку.

Чтобы выделить несколько столбцов или строк, щелкаем левой кнопкой мыши по названию, держим и протаскиваем.

Для выделения столбца с горячих клавиш ставим курсор в любую ячейку нужного столбца – нажимаем Ctrl + пробел. Для выделения строки – Shift + пробел.

Как изменить границы ячеек

Если информация при заполнении таблицы не помещается нужно изменить границы ячеек:

Передвинуть вручную, зацепив границу ячейки левой кнопкой мыши.

Ширина столбца.

Когда длинное слово записано в ячейку, щелкнуть 2 раза по границе столбца / строки. Программа автоматически расширит границы.

Автозаполнение.

Если нужно сохранить ширину столбца, но увеличить высоту строки, воспользуемся кнопкой «Перенос текста» на панели инструментов.

Перенос по словам.

Для изменения ширины столбцов и высоты строк сразу в определенном диапазоне выделяем область, увеличиваем 1 столбец /строку (передвигаем вручную) – автоматически изменится размер всех выделенных столбцов и строк.

Ширина столбцов.

Примечание. Чтобы вернуть прежний размер, можно нажать кнопку «Отмена» или комбинацию горячих клавиш CTRL+Z. Но она срабатывает тогда, когда делаешь сразу. Позже – не

Чтобы вернуть строки в исходные границы, открываем меню инструмента: «Главная»-«Формат» и выбираем «Автоподбор высоты строки»

Автоподбор высоты строки.

Для столбцов такой метод не актуален. Нажимаем «Формат» - «Ширина по умолчанию». Запоминаем эту цифру. Выделяем любую ячейку в столбце, границы которого необходимо «вернуть». Снова «Формат» - «Ширина столбца» - вводим заданный программой показатель (как правило это 8,43 - количество символов шрифта Calibri с размером в 11 пунктов). ОК.

Как вставить столбец или строку

Выделяем столбец /строку правее /ниже того места, где нужно вставить новый диапазон. То есть столбец появится слева от выделенной ячейки. А строка – выше.

Место для вставки столбца.

Нажимаем правой кнопкой мыши – выбираем в выпадающем меню «Вставить» (или жмем комбинацию горячих клавиш CTRL+SHIFT+"=").

Добавить ячейки.

Отмечаем «столбец» и жмем ОК.

Совет. Для быстрой вставки столбца нужно выделить столбец в желаемом месте и нажать CTRL+SHIFT+"=".

Все эти навыки пригодятся при составлении таблицы в программе Excel. Нам придется расширять границы, добавлять строки /столбцы в процессе работы.

Пошаговое создание таблицы с формулами

Заполняем вручную шапку – названия столбцов. Вносим данные – заполняем строки. Сразу применяем на практике полученные знания – расширяем границы столбцов, «подбираем» высоту для строк.

Данные для будущей таблицы.

Чтобы заполнить графу «Стоимость», ставим курсор в первую ячейку. Пишем «=». Таким образом, мы сигнализируем программе Excel: здесь будет формула. Выделяем ячейку В2 (с первой ценой). Вводим знак умножения (*). Выделяем ячейку С2 (с количеством). Жмем ВВОД.

Формула.

Когда мы подведем курсор к ячейке с формулой, в правом нижнем углу сформируется крестик. Он указываем на маркер автозаполнения. Цепляем его левой кнопкой мыши и ведем до конца столбца. Формула скопируется во все ячейки.

Автозаполнение ячеек.Результат автозаполнения.

Обозначим границы нашей таблицы. Выделяем диапазон с данными. Нажимаем кнопку: «Главная»-«Границы» (на главной странице в меню «Шрифт»). И выбираем «Все границы».

Все границы.

Теперь при печати границы столбцов и строк будут видны.

Границы таблицы.

С меню «Шрифт» можно форматировать данные таблицы Excel, как в программе Word.

Меню шрифт.

Поменяйте, к примеру, размер шрифта, сделайте шапку «жирным». Можно установить текст по центру, назначить переносы и т.д.

КАК СОЗДАТЬ ТАБЛИЦУ В EXCEL: ПОШАГОВАЯ ИНСТРУКЦИЯ

Простейший создания таблиц уже известен. Но в Excel есть более удобный вариант (в плане последующего форматирования, работы с данными).

Сделаем «умную» (динамическую) таблицу:

Переходим на вкладку «Вставка» - инструмент «Таблица» (или нажмите комбинацию горячих клавиш CTRL+T).

Вставка таблицы.

В открывшемся диалоговом окне указываем диапазон для данных. Отмечаем, что таблица с подзаголовками. Жмем ОК. Ничего страшного, если сразу не угадаете диапазон. «Умная таблица» подвижная, динамическая.

Таблица с заголовками.

Примечание. Можно пойти по другому пути – сначала выделить диапазон ячеек, а потом нажать кнопку «Таблица».

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