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

Запишите число, которое будет напечатано в результате выполнения следующей программы:

var n, s: integer;

begin

n := 1;

s := 0;

while n <= 650 do begin

s := s + 20;

n := n * 5

end;

write(s)

end.

Показать ответ
Ответ:
цветок82
цветок82
12.02.2020 10:06
1.
var
  s: string;
  i, count: integer;
begin
  writeln('Vvedite stroky: ');
  readln(s);
  for i := 1 to length(s) - 2 do
    if copy(s, i, 3) = 'abc' then
      count := count + 1;
  writeln('Kol-vo: ', count);
end.
2.
var
  s1, s2: string;
  i, len1, len2: integer;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  len1 := length(s1);
  len2 := length(s2);
  if len1 > len2 then writeln('1 stroka dlinnee')
  else if len1 < len2 then writeln('2 stroka dlinnee')
  else writeln('dlini strok ravnie')
end.
3.
var
  s1, s2, s3: string;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  s3 := s1[1] + s1[2] + s2[1] + s2[2];
  writeln('Novaja stroka: ', s3);
end.
0,0(0 оценок)
Ответ:
Gummanitarii
Gummanitarii
20.02.2023 01:30

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">

<html>

<head>

 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">

 <title>Твой title</title>

  <style type="text/css">

  TABLE {

   background: maroon; /* Цвет фона таблицы */

   color: white; /* Цвет текста */

  }

  TD {

   background: navy; /* Цвет фона ячеек */

  }

 </style>

</head>

<body>

 <h1>Заголовок</h1>

 <p>Первый абзац.</p>

 <p>Второй абзац.</p>

 <Img src="https://million-wallpapers.ru/wallpapers/1/55/506744950768048/biryuzovyj-gornoe-ozero.jpg" Width="200" Height="150">;

<ul>

<p><a href="https://superresheba.by/">resheba</a></p>

 <li>1</li>

 <li>2</li>

 <li>3</li>

 <li>4</li>

</ul>

<table>

<table cellpadding="4" cellspacing="1">

  <tr><th>Заголовок 1</th><th>Заголовок 2</th></tr>

  <tr><td>Ячейка 3</td><td>Ячейка 4</td></tr>

</table>

</body>

</html>

Объяснение:

P.S css добавил в этом же коде (не в отдельном файле).

И картинка по ссылке. Ее тоже можно было бы в отдельный файл записать(по необходимости).

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота