Ответ:
Объяснение:
Программа и результат работы в прикрепленных файлах:
Var a,b:real;
i,d:integer;
begin
a:=0;
b:=0;
d:=1;
for i:=1 to 30 do begin
a:=a+100;
b:=b+d;
d:=d*2;
end;
b:=b/100;
if a>b then writeln('Богач отдал больше') else writeln('Бедный отдал больше');
end.
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Replace('ма','ко').Println
end.
<u>Пример</u>
Тамара сломала куклу.
Такора слокола куклу.
Процессор расположен на системной плате (на материнской плате).
Ответ: 2
Мы ставим курсор в начало латинского слова, затем удаляем его.
Что бы удалить символ после курсора нужно нажать delete.