Тест по информатике

--Для выбора цвета фона в графическом редакторе Paint необходимо во время построения нажать:
1)левую кнопку мыши
2)клавишу(shift)
3)правую кнопку мыши
4)клавишу (Alt)
--Результатом вычислений в ячейке C1 табличного процессора Microsoft Excel будет число: A | B | C | 5 | =A1+3 | =A1+B1 |
1)13
2)9
3)11
4)7
Какой панели не бывает в программе Microsoft Word?
1)управления
2)стандартной
3)форматирования
4)рисования
Тег языка гипертекстовой разметки HTML означает:
1)название документа
2)начало заголовка документа
3)начало основного содержания документа
4)начало документа

👇

Открыть все ответы

Ответ:

slavakonst

16.12.2022

Вот порядок приготовления пельменей. В посуду смешивают яйцо,вода, мука. чуть соли. .Тесто замешивают до консистенции,чтоб можно было резать ножом. Дальше Некоторые раскатывают большой сочень потом стаканом или другой формой выдавливают лепешечки на посредственно для пельменей туда кладут фарш слепили и готово. Другие раскатывают тесто под вид колбаски ,затем ножом эту колбаску разрезают на равные части,которые раскатывают для фарша. Я знаю три вида формы пельменей.

4,4(30 оценок)

Ответ:

madinaseidahmet

16.12.2022

1. "Школьное" решение

// PascalABC.NET 3.0, сборка 1073
const
sb='bcdfgjklmnpqrstvwxz';
s='Computer programming is a process of computer programs creation';
var
i,n:integer;
s1,sn,t:string;
begin
i:=1;
while s[i]<>' ' do Inc(i);
s1:=Copy(s,1,i-1);
n:=Length(s); i:=n;
while s[i]<>' ' do Dec(i);
sn:=Copy(s,i+1,n-i);
t:='';
for i:=1 to Length(s1) do
    if Pos(s1[i],sb)>0 then t:=t+s1[i];
s1:=t;
t:='';
for i:=1 to Length(sn) do
    if Pos(sn[i],sb)>0 then t:=t+sn[i];
sn:=t;
t:='';
for i:=1 to Length(s1) do
    if Pos(s1[i],sn)>0 then
      if Pos(s1[i],t)=0 then t:=t+s1[i];
for i:=1 to Length(t) do Write(t[i],' ');
Writeln
end.

Тестовый прогон:
t r

2. "Нормальное" решение

// PascalABC.NET 3.0, сборка 1073
const
sb='bcdfgjklmnpqrstvwxz';
s='Computer programming is a process of computer programs creation';
begin
var a:=s.ToWords(' ');
a[0].Intersect(a[a.Length-1]).Where(x->Pos(x,sb)>0).Println(',')
end.

Тестовый прогон:
t,r

4,7(96 оценок)

Это интересно:

Семейная-жизнь

09.02.2020

Все, что вам нужно знать о последних неделях беременности...

Здоровье

05.05.2023

Как правильно лечить разрыв кисты яичника?...

Образование-и-коммуникации

18.04.2023

Как заставить коллегу перестать указывать вам, как делать вашу работу: советы по установлению границ, коммуникации и уверенности в себе...

Образование-и-коммуникации