< >

написать программу заменяющую последнюю букву каждого слова в предложении на ! 80 баллов

Ответы

Ответ дал: pomoikajostkiy
0

Ответ:

program prim1;  

Var  

s: string;  

j, k: integer;  

begin  

writeln ('Введите строку символов');  

readln (s);  

k:=0;  

for j=1 to length(s) do  

if s[j]='а' then s[j]:='о' ;  

writeln ('Результат: ', s);  

end.

Похожие вопросы
Геометрия
1 год назад
Нужно срочно! Дано точки A(-3;6;4), B(6;-1;2), C(0;3;-2). Знайдіть точку D, яка належить площині xz, таку, що виконується рівність​
Физика
1 год назад
Використовуючи співвідношення між кратними і частинними одиницями, встановити замість крапок числові значення довжини так, щоб вираз був правильним: l=25 м=...км…мм.
Биология
1 год назад
Навіщо виробляють продукти харчування які заносять в організм всілякі погані бакрерії? ​
Математика
1 год назад
2/7 от ? нед.=? Сут прочно нужно момогите пж
Алгебра
2 года назад
-5 1/2+(-3 1/20)= помогите​
Другие предметы
2 года назад
умоляю помогите естество знание ​
Математика
8 лет назад
Сколькими способами можно распределить 5 девочек и 3 мальчика на две равные группы для похода, если в каждой группе должен быть хотя бы один мальчик?
География
8 лет назад
допоможіть буть ласка