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

Надо. 3 .ответьте на следующие вопросы.1. чем различаются текстовые редакторы и текстовые процессоры? 2. какие текстовые редакторы вы знаете? 3. какие текстовые процессоры вы знаете? 4. каковы возможности текстовых процессоров? 5. как сохранить документ после редактирования? 6. что вы понимаете под словом «блок»? 7. как называется выделенная часть текста? 8. как удалить лишний символ в тексте? 9. как удалить несколько строк текста? 10. какая панель инструментов используется для закраскивнутренней части прямоугольника в текстовом процессоре word? 11. при каких действий закрашивается внутренняя частьэллипса и его границы в текстовом процессоре word? выполните следующие : 1. покажите на примерах, как перенести слово на другую строку.2. объясните на примерах, как скопировать выделенную частьтекста.3. покажите на примерах, как отформатировать выделеннуючасть текста.4. начертите рисунки для оформления компьютерного класса.5. нарисуйте картинки о природе.6. подготовьте следующий документ, используя возможноword.​

👇
Открыть все ответы
Ответ:
ritagribaleva
ritagribaleva
01.07.2022
Обратим внимание, что задания 2 и 3 предполагают одинаковый результат: в самом деле, если число оканчивается на 2, то оно четное, т.е. кратно двум, что приводит задание 3 к заданию 2.
Для задания 1 или заданий 2,3 оставляем в программе только нужную строку.в соответствии с комментарием.

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),1,99); a.Println;
  Writeln('k=',a.Where(k->k.IsEven).Count); // для задания 1
  Writeln('s=',a.Where(k->k mod 10=2).Sum) // для заданий 2/3
end.

Пример
n= 17
61 32 83 78 47 80 85 64 52 85 30 77 96 81 14 65 67
k=8
s=84
4,5(4 оценок)
Ответ:
Karlik777
Karlik777
01.07.2022
Program triples;
const
RAND_F = 1;
RAND_T = 20;
var
b: array[1..15] of integer;
t: array[1..3] of integer;
i, j, max, max_i, tmp: integer;
begin
randomize;
for i := 1 to 15 do
b[i] := random(RAND_T) + RAND_F;
i := 1;
while i < 15 do
begin
t[1] := b[i];
t[2] := b[i+1];
t[3] := b[i+2];
max := t[1];
for j := 2 to 3 do
if t[j] > max then
begin
max := t[j];
max_i := j;
end;
tmp := t[3];
t[3] := max;
t[max_i] := tmp;
if t[2] < t[1] then
begin
tmp := t[2];
t[2] := t[1];
t[1] := tmp;
end;
write('Числа ', i, '-', i + 2, ': ');
writeln(t[1], ' ', t[2], ' ', t[3]);
i := i + 3;
end;
end.
4,8(17 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ