М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
яя82
яя82
29.12.2021 20:57 •  Информатика

сделать диаграмму по исходным данным в любой программе


сделать диаграмму по исходным данным в любой программе

👇
Открыть все ответы
Ответ:
samruk1974
samruk1974
29.12.2021
Var n:integer;
a:array[1..27] of string[15]=
 ('один','два','три','четыре','пять','шесть','семь','восемь','девять',
  'десять','одиннадцать','двенадцать','тринадцать','четырнадцать',
  'пятнадцать','шестнадцать','семнадцать','восемнадцать','девятнадцать', 
  'двадцать','тридцать','сорок','пятьдесят','шестьдесят','семьдесят',
  'восемьдесят','девяносто');
begin
write('N (1..99) = ');
readln(N);
if (n>=1)and(n<=19)
  then writeln(a[n])
  else begin 
       write(a[n div 10 + 18]);
       if n mod 10 <> 0 then write(' ',a[n mod 10]);
       writeln;
       end;
end. 

Пример:
N (1..99) = 46
сорок шесть
4,6(11 оценок)
Ответ:
Dmitry228q
Dmitry228q
29.12.2021

Ethernet — это самая распространённая технология локальных сетей в мире. Сотни миллионов устройств и высокий спрос на поддержку Ethernet-систем говорят о том, что изобретение 43-летней давности прочно закрепилось и никуда не исчезнет в ближайшее время.

Объяснение:

В ходе развития компьютерной техники Ethernet постоянно «переизобретали», добавляли новые возможности и сделали общепринятой сетевой технологией. В этом материале мы затронем тему эволюции Ethernet — от изобретения до превращения в стандарт международного уровня и основу огромного количества сетей.

4,6(74 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ