Напишите программу, которая заменяет расширение у заданного имени файла. входные данные первая строка содержит имя файла, которое нужно изменить. во второй строке записано нужное расширение. выходные данные программа должна вывести изменённое имя файла с заданным расширением. примеры входные данные qwerty exe выходные данные qwerty.exe входные данные qwetry.old.pas html выходные данные qwetry.old.html
dimar3256
2
28.07.2019 13:40
40
Другие вопросы по теме Информатика
veseloffgleb
18.02.2020 05:33
Siyahbeyazask1
18.02.2020 05:34
MarkohkaMolovko
18.02.2020 05:40
vikamorgunova0
15.09.2019 00:50
ES2017
15.09.2019 00:50
KiskaDasha
15.09.2019 00:50
oladushek2002oy6bqn
09.07.2019 14:50
resssnizisss
15.08.2019 21:40
barbara27
15.08.2019 21:30
Популярные вопросы
- Фанфіки - продовження історій за твором Митькозавр із Юрківки ...
3 - 2) 50% от чисел 16, 24, 22, 90, 3) 25% от чисел 28, 36, 68, 100, 232,...
1 - Птичка полетела по течению до нижнего конца трубы где и дождалась...
1 - -20*(х-13)-220розв яжіть рівняння...
2 - надо чтобы на прямой была показана точка ...
3 - 4. Bilde Sätze! 1. der Junge, die Zeitung, geben.2. der Brief, der...
2 - 6) ученики проводили опыты по изучению свойств почвы. ребята взяли...
2 - 5b Say True, False or Don t know.a Polar bears are good mothers.b They...
1 - 1 ученый, который выступил против теории самозарождения : а) Луи Пастер;B)...
3 - здравствуйте ребята помагите правильно и сделаю лутчим ответа и потпишусь...
3
Var
s,sf:string;
begin
readln(s);
readln(sf);
if pos('.',s)<>0 then
delete(s,s.LastIndexOf('.')+2,length(s)-s.LastIndexOf('.'))
else
s+='.';
writeln(concat(s,sf));
end.
Пример ввода:
point.simple.txt
pdf
Пример вывода:
point.simple.pdf