В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Sashaooo
Sashaooo
05.02.2022 14:24 •  Информатика

Во диктанта (ставить в ответ + или –)
1. В программе МS Excel клавиша Ctrl в сочетании с четырьмя стрелками используется для перемещения внутри листа
2. Для вставки и удаления столбцов и строк в МS Excel нет необходимости в их выделении.
3. Операция закрепления заголовков столбцов и строк в МS Excel осуществляется с команд Вид- Закрепить области –Закрепить область
4. График используется сравнения частей составляющих целое
5. Для обрамления таблицы в МS Excel необходимо выполнить операции: а) выделение таблицы; б) выбрать из контекстного меню формат ячейки- границы- внешние и внутренние- Ок
6. Круговая диаграмма в МS Excel используется тогда, когда необходимо изменение некоторого параметра на протяжении определенного периода времени.
7. Ввод формулы в ячейки таблицы начинается со знака «равно»
8. Клавиша F2 в МS Excel используется для правки содержимого ячеек
9. Абсолютной называется ссылка, которая не изменяется при копировании формул в другую ячейку.
10. Относительная ссылка изменяется при копировании
11. Функция- это уже готовая сложная формула, по которой проводятся операции вычисления над группой определенного типа
12. Адрес ячейки А12С является ли правильным
13. Диапазон – это совокупность клеток, образующих в таблице область прямоугольной формы
14. Адрес ячейки – это заголовок столбца и номер строки, на пересечении которых расположена ячейка
15. При сохранении файлу по умолчанию присваивается имя Документ1, расширение –doc.

Показать ответ
Ответ:
momreomgr
momreomgr
15.03.2020 05:36
Var
 a:array[1..3,1..3] of integer;
 t:array[0..2] of boolean;
 k:array[0..2] of integer;
 i,j:integer;
 res:boolean;

begin
 for i := 1 to 3 do
 for j := 1 to 3 do
   read(a[i,j]);
 for i := 0 to 2 do
  begin
  k[i] := 0;
  t[i] := false;
  end;
 
 for i := 1 to 3 do
 for j := 1 to 3 do
   k[a[i,j]] := k[a[i,j]] + 1;
 
 for i := 1 to 3 do
   begin
   if (a[i,1] = a[i,2]) and (a[i,2] = a[i,3]) then
     t[a[i,1]] := true;
   if (a[1,i] = a[2,i]) and (a[2,i] = a[3,i]) then
     t[a[1,i]] := true;
   end;
 if (a[1,1] = a[2,2]) and (a[2,2] = a[3,3]) then
   t[a[2,2]] := true;
 if (a[3,1] = a[2,2]) and (a[2,2] = a[1,3]) then
   t[a[2,2]] := true;
 
 res := true;
 
 if (k[1] - k[2] > 1) or (k[1] - k[2] < 0) then
   res := false;
 
 if t[1] and ( t[2] or (k[1] = k[2]) ) then
   res := false;
 
 if res then
   writeln('YES')
 else
   writeln('NO')
end.
0,0(0 оценок)
Ответ:
vladimirnvrskp08453
vladimirnvrskp08453
04.04.2020 12:06
//PascalABC.NET 3.2 сборка 1318

Var
  n,i,j,resi,resj,flag:integer;
begin
flag:=0;
i:=1;
readln(n);
while power(i,3)<n do
  begin
    j:=1;
    while power(j,3)+power(i,3)<=n do
      begin
        if power(j,3)+power(i,3)=n then
        begin
          flag:=1;
          resi:=i;
          resj:=j;
          break;
        end;
        inc(j);
      end;
    if flag=1 then break;
    inc(i);
  end;
if flag=1 then writeln(resi,' ',resj,' ',resj,' ',resi) else writeln('impossible');
end.

Пример ввода:
1008                           //2^3+10^3
Пример вывода:
2 10 10 2
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота