ангилино
01.08.2022 06:42

Чтобы изменить параметры страниц в текстовом редакторе Word следует

выполнить какую команду?

2. Печать документа выполняется с какой команды?

3.Какую команду выполняем для вставки нумерации страниц

4. Какую команду выполняем для вставки границ умоляю вас ❗❗❗❗❗❗❗​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Ivan21101
31.05.2020 16:27
1. Короткий вариант

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var a:=ArrRandom(10,10,20); a.Println;
  Writeln('Сумма кубов ',a.Select(x->x*x*x).Sum);
  a.Transform(x->x-5); a.Println
end.

Тестовое решение
14 17 12 17 20 11 13 18 19 20
Сумма кубов 46517
9 12 7 12 15 6 8 13 14 15

2. "Школьный вариант"

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
var
  a:array[1..10] of integer;
  i,s:integer;
begin
  Randomize;
  s:=0;
  for i:=1 to 10 do begin
    a[i]:=Random(11)+10;
    Write(a[i],' ');
    s:=s+a[i]*sqr(a[i])
    end;
  Writeln;
  Writeln('Сумма кубов ',s);
  for i:=1 to 10 do begin
    a[i]:=a[i]-5;
    Write(a[i],' ')
    end;
  Writeln
end.
0,0(0 оценок)
Ответ:
миша1135
03.07.2021 06:35
Предположим, что это две разные задачи. Окей.
1.
Var x : real;Beginreadln(x);if (x<=4) and (x>=0) thenWriteln('Число принадлежит интервалу от 0 до 4')elseWriteln('Число не принадлежит интервалу от 0 до 4');Readln(x);end.   // Readln в конце можно не писать, это делается для того, чтобы           //программа остановилась и можно было посмотреть результат!

2.
Var x : longint;BeginReadln(x);if (x mod 5 = 0) thenWriteln('Число делится на 5!')elseWriteln('Число не делится на 5!');if (x mod 10 = 0) thenWriteln('Число делится на 10!')elseWriteln('Число не делится на 10!');Readln(x);end.              // Тут с Readln та же фигня
 
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота