Вася хотел, чтобы эта строчка выводила на экран текст: 1200<\SUP><\U>

1200,однако HTML-обозреватель неверно выводит текст. В чём же состоит ошибка разработчика гипертекста?

1)Открывающие и закрывающие тэги чередуются в неверном порядке
2)Вместо открывающей угловой скобки тэга поставлена сущность <
3)Косая черта закрывающих тэгов наклонена в другую сторону
4)Открывающий тэг элемента SUP указан со строчной буквы, а закрывающий – с прописной

👇

Увидеть ответ

Ответ:

Olgarezkova

19.05.2021

Вариант номер 3

Объяснение:

синтексис языка принимает значения ввода и вывода по такому типу

<p> содержания </p>

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

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

Ответ:

Masha07041

19.05.2021

1. Современный вариант
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
ReadlnString.GroupBy(c->c).Select(x->(x.Key,x.Count)).OrderBy(x->x[0])
.Select(x->Format('"{0}" - {1}',x[0],x[1])).Println(NewLine)
end.

Пример
10101110
"0" - 3
"1" - 5

2. Школьный вариант в стиле Pascal ABC, Free Pascal

var
s:string;
i,k0,k1:integer;
begin
Readln(s);
k0:=0; k1:=0;
for i:=1 to Length(s) do
if s[i]='0' then Inc(k0) else Inc(k1);
Writeln('"0" - ',k0);
Writeln('"1" - ',k1)
end.

Вывод результатов точно такой же, как и выше.

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

Ответ:

киреева2

19.05.2021

1. Современное решение, когда можно решить "в одну строку"

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

begin
Writeln('S=',ReadSeqInteger(3).Select(n->n.ToString
    .Where(d->Pos(d,'13579')>0)).SelectMany(c->c)
    .Select(c->c.ToDigit).Sum)
end.

Пример
252 337 105
S=24

2. А примерно вот так учат писать в школе - долго и длинно (да и не особо понятно)

var
m,i,j,s,d:integer;
begin
s:=0;
for i:=1 to 3 do begin
    Read(m);
    for j:=1 to 3 do begin
      d:=m mod 10;
      if d mod 2<>0 then s:=s+d;
      m:=m div 10
      end
    end;
Writeln('S=',s)
end.

4,6(56 оценок)

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

Искусство-и-развлечения

30.05.2021

Как стать пресс-агентом: советы от профессионалов...

Стиль-и-уход-за-собой

11.12.2022

Как ухаживать за кожей после шугаринга...

Компьютеры-и-электроника

23.09.2020

5 шагов, чтобы легко добавить названия к графикам в Excel...

12.09.2022