Первое: https://pastebin.com/T5FRuLER
Второе: https://pastebin.com/0GQ2e9Fd
Архиватор - WinRAR
Коммуникационная программа - <span>Outlook Express
</span>Системы программирования - <span>Microsoft Visual Basic
Электронные таблицы - Microsoft Excel
Игры - CS:GO
Графический редактор - Paint
Текстовый редактор - Microsoft Word</span>
В ячейку B2 скопировалась формула =F$5-$D5 (Т.к. 5 _ D фиксированные, а смещение просиходит на 1 вправо и 1 вниз, меняются E на F и 4 на 5)
B2=30-24=6
Var a:string;
i:Integer;
begin
read(a);
for i:=Length(a) downto 1 do
write(a[i]);
end.
полегче надо
Как бы там не один вариант)))