Работа в яклассе.
Доступ к файлу name.xls, находящему на сервере jour.com, осуществляется по протоколу http. Фрагменты адреса файла закодированы цифрами от 1 до 7. Укажи последовательность этих цифр, кодирующую адрес указанного файла в сети Интернет.

com
://
jour.
xls
/
name.
http

(Цифры вводи по одной в ячейку)
ответ:

Uses
  crt;

var
  a, b, c: integer;

begin
  clrscr;
  writeln('Что вы хотите сделать?');
  writeln('1-сложить 2-отнять 3-разделить 4-умножить');
  readln(c);
  if c = 1 then begin
    read(a, b);
    writeln(a + b)
  end
  else
  if c = 2 then begin
    read(a, b);
    writeln(a - b)
  end
    else
  if c = 3 then begin
    read(a, b);
    writeln(a / b)
  end
      else
  if c = 4 then begin
    read(a, b);
    writeln(a * b);
  end
  else
    write('Так, стоп, че за фигня? Где то тут меня надурили...');
  readkey
end.

Но короче и понятнее это написать так:
uses
  crt;

var
  a, b, c: integer;

begin
  ClrScr;
  Writeln('Что вы хотите сделать?');
  Write('1-сложить 2-отнять 3-разделить 4-умножить'); Readln(c);
  if (c >= 1) and (c <= 4) then begin
    Write('Введите через пробел два натуральных числа: '); Read(a, b);
    case c of
      1: Writeln(a + b);
      2: Writeln(a - b);
      3: Writeln(a / b);
      4: Writeln(a * b)
    end;
  end
  else Write('Так, стоп, че за фигня? Где то тут меня надурили...');
  ReadKey
end.

ответ: =$D4*5.

Пояснение:

заметим, что буква адреса (D) оба раза одна и та же, что было невозможно без знака доллара: в противном случае получились бы различные буквы, отстоящие друг от друга на две буквы в алфавите

цифра — 4, и она в формуле без доллара. При копировании из E4 в C4 цифра не меняется (та же самая строка), при копировании в E5 значение увеличивается на единицу

Умножение на число 5 присутствует в обеих формулах, следовательно, оно есть и в оригинале (к слову, действия, не содержащие адресов ячеек, всюду копируются без каких-либо изменений).