завдання #11 запитання: як вибрати для роботи окрему клітинку? виберіть один з 4 варіантів відповіді: 1) встановити вказівник на абзац і клацнути 2) встановити клітинку на вказівник і клацнути 3) встановити вказівник на вказівник і клацнути 4) встановити вказівник на клітинку і клацнути завдання #12 запитання: як вибрати для роботи стовпець? виберіть один з 4 варіантів відповіді: 1) встановити вказівник над рядком і клацнути 2) встановити вказівник зліва навпроти стопця і клацнути 3) встановити вказівник на клітинку і клацнути 4) встановити вказівник над стовпцем і клацнути завдання #13 запитання: як вибрати для роботи кілька клітинок? виберіть один з 4 варіантів відповіді: 1) перетягнути по них абзац із натиснутою лівою кнопкою миші 2) перетягнути по них ліву кнопку миші з натиснутим вказівником 3) перетягнути по них ліву кнопку стовпця з натиснутим вказівником 4) перетягнути по них вказівник із натиснутою лівою кнопкою миші завдання #14 запитання: як об’єднати кілька клітинок таблиці в одну клітинку? виберіть один з 4 варіантів відповіді: 1) виділити клітинки, у контекстному стовпці вибрати команду 2) виділити клітинки, у контекстному рядку вибрати потрібну команду 3) виділити абзаци, в контекстному меню вибрати потрібну команду 4) виділити клітинки, у контекстному меню вибрати потрібну команду завдання #15 запитання: що можна змінити під час налаштування вигляду меж клітинок таблиці? виберіть декілька з 4 варіантів відповіді: 1) довжину і вигляд ліній межі 2) колір заливки клітинки 3) кольорову заливку абзаців 4) товщину і вигляд ліній межі завдання #16 запитання: як встановити однакову ширину для кількох суміжних стовпців або рядків? виберіть один з 4 варіантів відповіді: 1) виділити клітинку, у контекстному стовпці вибрати команду 2) виділити клітинку, у контекстному рядку вибрати потрібну команду 3) виділити абзац, у контекстному меню вибрати потрібну команду 4) виділити стовпці або рядки, у контекстному меню вибрати потрібну команду завдання #17 запитання: відновіть послідовність дій для вставлення таблиці в текстовий документ. вкажіть послідовність всіх 4 варіантів відповіді: __ у вікні встановити кількість стовпців і рядків __ відкрити вікно вставлення таблиці __ підтвердити дії, натиснувши ок __ встановити курсор на місце, де має бути таблиця завдання #18 запитання: відновіть послідовність дій для змінення розмірів стовпця або рядка. вкажіть послідовність всіх 4 варіантів відповіді: __ перетягнути стрілку __ натиснути ліву кнопку миші __ відпустити кнопку миші __ навести вказівник на межу стовпця або рядка завдання #19 запитання: як встановити лінію, що розділяє колонки? виберіть один з 4 варіантів відповіді: 1) у вікні список встановити прапорець роздільник 2) у вікні колонки встановити прапорець список 3) у вікні абзац встановити прапорець роздільник 4) у вікні колонки встановити прапорець роздільник завдання #20 запитання: як для вибраного фрагмента тексту встановити формат «підрядковий знак»? виберіть один з 4 варіантів відповіді: 1) на вкладці основне у групі шрифт виконати список 2) на вкладці абзац у групі список вибрати підрядковий знак 3) виділити підрядковий список 4) на вкладці основне у групі шрифт вибрати підрядковий знак
Ответы
Поскольку в условии не сказано, включать ли в множество повторяющиеся символы, принято решение для простоты их включать.
const
nn = 100;{максимальная мощность множества}
var
m: array[1..nn] of char;
i, n, n1: integer;
s1, s2: string;
alpha, digit: set of char;
begin
alpha := ['А'..'я'];
digit := ['0'..'9'];
n := 0;
Writeln('Введите строку символов первого множества');
Readln(s1);
Writeln('Введите строку символов второго множества');
Readln(s2);
for i := 1 to Length(s1) do
if (s1[i] in alpha) then begin n := n + 1; m[n] := s1[i] end;
for i := 1 to Length(s2) do
if (s2[i] in digit) then begin n := n + 1; m[n] := s2[i] end;
Writeln('Результирующее множество');
for i := 1 to n do Write(m[i]:2)
end.
Тестовое решение:
Введите строку символов первого множества
-This 1*2 П*ро=изvolnый наbop сим;волob**
Введите строку символов второго множества
Отсюда 1-(4)=5 только цифры 33.634 berem
Результирующее множество
П р о и з ы й н а с и м в о л 1 4 5 3 3 6 3 4
const
nn = 100;{максимальная мощность множества}
var
m: array[1..nn] of char;
i, n, n1: integer;
s1, s2: string;
alpha, digit: set of char;
begin
alpha := ['А'..'я'];
digit := ['0'..'9'];
n := 0;
Writeln('Введите строку символов первого множества');
Readln(s1);
Writeln('Введите строку символов второго множества');
Readln(s2);
for i := 1 to Length(s1) do
if (s1[i] in alpha) then begin n := n + 1; m[n] := s1[i] end;
for i := 1 to Length(s2) do
if (s2[i] in digit) then begin n := n + 1; m[n] := s2[i] end;
Writeln('Результирующее множество');
for i := 1 to n do Write(m[i]:2)
end.
Тестовое решение:
Введите строку символов первого множества
-This 1*2 П*ро=изvolnый наbop сим;волob**
Введите строку символов второго множества
Отсюда 1-(4)=5 только цифры 33.634 berem
Результирующее множество
П р о и з ы й н а с и м в о л 1 4 5 3 3 6 3 4
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Для какого из приведённых значений числа X ложно высказывание: НЕ (X < 6) ИЛИ (X < 5)? 4 6 5 7
Автор: yahottabych201379
Написать программу для вычисления значения функции в visual studio C#
Автор: Федоровна-Васильева
В якому режимі роботи є можливість використовувати трансформацію Extrude
Автор: ViktorovnaLarin
сделать это в программе Word Отправьте мне как сделаете умоляю
Автор: АндреевичОльга641
В каких сферах деятельности используются суперкомпьютер Ломоносов?
Автор: optima3559
type mas = array[-10..10] of integer;
const n = 5;
var s, i:integer;
a:mas;
begin
randomize;
writeln('Номера четных отрицательных элементов:');
s := 0;
for i := 1 to n do
begin
a[i] := random(1000) - 500;{Числа рандомизируются от -500 до 500}
end;
for i:=1 to n do
begin
write(a[i], ' ');
end;
for i:=1 to n do
begin
if (a[i] < 0) and (a[i] mod 2 = 0)
then
begin
write(i, ' ');
s := s + a[i];
end;
end;
writeln;
writeln('Их сумма = ', s);
end.