В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Loloshka321
Loloshka321
11.09.2021 23:38 •  Информатика

Уержана есть плитка шоколада. размер плитки шоколада n x m. ержан хочет сделав только один разлом(по вертикали или горизонтали) получить k долек от шоколада. напишите программу, которая ержану определить может ли он получить k долек.

вводные данные: в трех строках даны 3 числа, первое n, второе m и третье число k.

выходные данные: сообщение "yes" если можно поделить и сообщение "no" если не возможно.
pascal

Показать ответ
Ответ:
двоишник228333
двоишник228333
30.08.2021 13:42

Web-страницы или гипертекстовые документы (html-документы) - это текстовые файлы, размеченные тегами (tags) с языка HTML (HyperText Markup Language). HTML не является языком программирования, он является языком разметки или средством форматирования гипертекста. Для разметки документа используются теги. Теги заключаются в угловые скобки. В основном теги являются парными, т.е. существуют открывающий и закрывающий теги.

Язык разметки HTML позволяет форматировать текст веб страницы, размещать на ней графические объекты, рисунки, вставлять звукозапись и различные мультимедийные элементы, а так же скрипты (JavaScript, VBScript), создавать гипертекстовые ссылки.

Веб-страница начинается и заканчивается парными тегами <html> и </html>. Между этими тегами размещаются парные теги <head>, </head> (голова веб-страницы), между которыми размещаются парные теги <title></title> для заголовка web-страницы, а также вводятся различные метатеги для ключевых слов, описания содержания страницы и т.д.

Затем следуют теги <body>, </body> (тело веб-страницы), между этими тегами размещается содержание или контент страницы.
Вот самый что не на есть стандартный шаблон страницы:
<html>
<head>
<!-- Тут подключаются различные стили, скрипты, а так же указывается краткая информация о странице в виде краткого описания и ключевых слов --> 
</head>
<body>
<!-- Тело страницы, тут располагается основной контент -->
</body>
</html>
Это всего лишь основа, на самом деле тегов в разметке очень много, например, есть еще теги <footer>, <sidebar>, <header> и т.д. Я даже не начал говорить о таких тегах как <div>, <ul> и т.п, много!
HTML - позволяет создавать только статичные страницы, т.е вся информация уже будет находиться на определенном .html-файле. Это конечно не плохо, если проект(сайт) будет не большим по размаху, но если он будет содержать 100-1000, а то и более страниц информации, то тут волей не волей уже задумаешься. Поскольку страницы статичные и если захотелось изменить дизайн сайта целиком, то придется редактировать КАЖДУЮ страницу! Это просто огромный, непосильный труд. Поэтому нам на идут языки веб-программирования такие, как PHP, Python и им подобные. Наиболее распространенный - это PHP(Personal HyperText Processor), распространен, потому что с ним легоко работать с БД(делать выборку, удалять, обновлять ну т.п). А в основном данные не статичных страниц хранятся в Базе Данных, это очень удобно и занимает меньше места. С языком ПХП можно просто создать один единый шаблон и просто использовать его, так не придется менять 1000 страниц, достаточно поменять одну единственную.
Это все кратко о создании Веб-страниц, не вдаваясь в детали. Надеюсь кратко и при этом понятно, удачи!:)

0,0(0 оценок)
Ответ:
Марямчик
Марямчик
10.12.2021 14:48
// PascalABC.NET 3.0, сборка 1088
const
  nn=100;

function sov(n:integer):boolean;
var
  i,s:integer;
begin
  s:=0;
  for i:=1 to n div 2 do
    if n mod i = 0 then s:=s+i;
  sov:=(s=n)
end;

var
  a:array[1..nn] of integer;
  i,n,k:integer;
begin
  Write('Введите количество элементов в массиве (1-100): ');
  Read(n);
  Randomize;
  Writeln('*** Сформированный массив ***');
  for i:=1 to n do begin
    a[i]:=Random(1000)+1;
    Write(a[i],' ')
    end;
  Writeln;
  Writeln('*** Найденные совершенные числа ***');
  k:=0;
  for i:=1 to n do
    if sov(a[i]) then begin Write(a[i],' '); Inc(k) end;
  if k=0 then Writeln('... к сожалению, не нашли ни одного')
end.

Тестовое решение:
Введите количество элементов в массиве (1-100): 100
*** Сформированный массив ***
890 171 531 345 764 347 433 602 368 51 490 271 310 249 96 365 751 521 951 501 646 467 24 698 23 580 902 950 154 607 263 333 625 92 454 302 661 323 806 761 989 645 606 739 87 151 231 804 990 496 422 805 982 664 178 424 148 833 322 184 446 484 449 761 789 158 647 219 796 794 704 429 715 190 513 1 861 285 612 872 349 99 960 659 185 458 352 961 914 31 155 828 1 622 316 505 197 845 951 930
*** Найденные совершенные числа ***
496

VBA Excel 2003
Function Sov(n As Integer) As Boolean
    Dim i As Integer, s As Integer
    s = 0
    For i = 1 To n / 2
        If n Mod i = 0 Then s = s + i
    Next i
    Sov = (s = n)
End Function

Sub main()
    Dim n As Integer, i As Integer, k As Integer
    Cells.Clear
    n = Val(InputBox("Введите количество элементов в массиве: "))
    ReDim a(1 To n) As Integer
    Randomize Timer
    Cells(1, 1).Value = "*** Сформированный массив ***"
    For i = 1 To n
        a(i) = Int(1000 * Rnd) + 1
        Cells(i + 1, 1).Value = a(i)
    Next i
    k = 0
    Cells(1, 5).Value = "*** Найденные совершенные числа ***"
    For i = 1 To n
        If Sov(a(i)) Then
            Cells(k + 2, 5) = a(i)
            k = k + 1
        End If
    Next i
    If k = 0 Then
        Cells(1, 5).Value = ""
        MsgBox "Совершенных чисел не найдено"
    End If
End Sub
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота