написать программу в паскале которая вставит между буквами введенного слова пробел
5-9 класс
|
var
s, s_new: string;
i: integer;
begin
read(s);
for i := 1 to length(s) do
s_new := s_new + s[i] + ' ';
writeln(s_new);
end.
Program BlankWord;
Uses Crt;
var s1:string;
l:integer;
begin
clrscr;
write('Введите Слово:');
readln(s1);
l=length(s1);
for i:=l downto 1 do
if(i mod 2 = 0)then
Insert(' ', s1, i);
writeln(s1);
readkey;
end.
Другие вопросы из категории
Вводиться число, написать таблицу умножения на это число
Чтобы ответ выводился так:
n*1=...
n*2=...
благодарна^^)
Д/З:
(мы проходим такие темы как перевод чисел из десятичной системы в двоичную и наоборот,а так же решение задач)
1)1001х=28
2)201х=33
3)302х+283х=140
4)1001х:11х=21х
5)211х-100х=17
6)31х*32х=130
7)31х:13х=2
P.S.если всё не сможете решить,то напишите пожалуйста,что вы смогли...:)))
Читайте также
программу которая вставит между буквами веденного слова пробелы 3)написать программу вывода на экран деление двух чисел
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
1. Написать программу нахождения произведения n чисел.
элементов совпадающих с первым элементом.