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

1.используя блокнот,определить какое слово в кодировке msdos,задано последовательностью кодов: 161,160,169,226 ,потому что у меня не получается,выбивает и

👇
Ответ:
alihan22888
alihan22888
03.08.2020
ответ: байт

Для проверки достаточно при нажатом ALT набрать на дополнительной цифровой клавиатуре цифры кода и при отпускании ALT введётся символ с этим кодом. Причём даже не обязательно это делать именно в блокноте - я коды набирал, когда давал ответ "байт".
4,8(63 оценок)
Открыть все ответы
Ответ:
mvrlin
mvrlin
03.08.2020
1. Размерностью, типом, статический/динамический, количеством измерений.
2. В классическом Паскале: var название массива:array[размерность/размерности] of тип (но на самом деле методов огромное количество)
3. Инициализация, установка размерности(динамический), ввод значений, манипуляции, освобождение памяти(динамический).
4. В классическом Паскале: имя массива[индекс элемента]:=значение (опять же, методов на самом деле много)
5.  В случае, если они присвоены посредством генератора псевдослучайных чисел.
6. 1. for i:=1 to размерность массива do
writeln(имя массива[i]);
2. for i:=1 to размерность массива do
write(имя массива[i]:4);
4,5(17 оценок)
Ответ:
1.var a,b,c:integer;
d,x1,x2:real;
begin;
readln(a);
readln(b);
readln(c);
d:=sqr(b)-4*a*c;
if d<0 then
   writeln('Нет корней')
   else
    if d=0 then
     begin;
      x1:=-b/(2*a);
      writeln(x1);
     end
      else
       begin;
        x1:=(-b+sqrt(d))/(2*a);
        x2:=(-b-sqrt(d))/(2*a);
        writeln(x1);
        writeln(x2);
       end;
end.
2)var x1,y1,x2,y2:integer;
r1,r2,rr:real;
begin;
readln(x1);
readln(y1);
readln(x2);
readln(y2);
r1:=sqrt(sqr(x1)+sqr(y1));
r2:=sqrt(sqr(x2)+sqr(y2));
if r1>r2 then
 begin;
  rr:=r1-r2;
  write('Расстояние от точки А до начала координат больше, чем расстояние от точки В до начала координат на ',rr,' единиц');
 end
  else
   if r1<r2 then
    begin;
     rr:=r2-r1; 
    write('Расстояние от точки B до начала координат больше, чем расстояние от точки A до начала координат на ',rr,' единиц');
    end
     else
      write('Точки A и B равноудалены от начала координат');
end.
4,5(86 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ