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

Письменно ответить на во С какого языка создаются web-страницы?
2. Что такое тэг?
3. Какие бывают теги?
4. В какой контейнер помещается весь HTML-код страницы?
5. На какие две логические части делится Web-страница? только быстро​

Показать ответ
Ответ:
zaxarenko2018
zaxarenko2018
06.04.2023 22:02
Привет! Предупреждай о языке. Ну а так, для примера напишу программу на языке Pascal.
Program LK;
var a,b,c,d:real;
begin
readln(a,b);
if a>b then c:=a else c:=b;
d:=c+a;
write(d);
end.
Классическая программа, которая выбирает больше из двух чисел и прибавляет первое к большему. Её вполне можно сократить до минимума, но в данной ситуации думаю лучше расписать.
*Итак, уточняй сразу - вот твой PYTHON :
z = int(input('z = '))
c = int(input('c = '))
if z > c:
print(1)
elif z < c:
print(2)
else:
print('Числа оказались равны') 
Хорошего дня!
0,0(0 оценок)
Ответ:
Roma1971
Roma1971
05.11.2021 14:59
PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger('n=');

 if n >= 1000 then Print('одна тысяча')

 else

 begin

   var d1 := n mod 10;

   var d2 := n div 10 mod 10;

   var d3 := n div 100;

   var s := '';

   case d3 of

     1: s := 'сто';

     2: s := 'двести';

     3: s := 'триста';

     4: s := 'четыреста';

     5: s := 'пятьсот';

     6: s := 'шестьсот';

     7: s := 'семьсот';

     8: s := 'восемьсот';

     9: s := 'девятьсот';

   end;

   if d2 = 1 then

   begin

     case d1 of

       0: s += ' десять';

       1: s += ' одиннадцать';

       2: s += ' двенадцать';

       3: s += ' тринадцать';

       4: s += ' четырнадцать';

       5: s += ' пятнадцать';

       6: s += ' шестнадцать';

       7: s += ' семнадцать';

       8: s += ' восемнадцать';

       9: s += ' девятнадцать';

     end;

     TrimLeft(s).Println

   end

   else

   begin

     case d2 of

       0: s += '';

       2: s += ' двадцать';

       3: s += ' тридцать';

       4: s += ' сорок';

       5: s += ' пятьдесят';

       6: s += ' шестьдесят';

       7: s += ' семьдесят';

       8: s += ' восемьдесят';

       9: s += ' девяносто';

     end;

     s := TrimLeft(s);

     case d1 of

       1: s += ' один';

       2: s += ' два';

       3: s += ' три';

       4: s += ' четыре';

       5: s += ' пять';

       6: s += ' шесть';

       7: s += ' семь';

       8: s += ' восемь';

       9: s += ' девять';

     end;

     TrimLeft(s).Println

   end

 end

end.

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