Составьте программу получения двух новых слов - Pascal ABC

Формулировка задачи:

Составьте программу получения двух новых слов из слова "информатика".

Решение задачи: «Составьте программу получения двух новых слов»

Листинг программы

s:='информатика';
s1:=copy(s,3,5);
s2:=copy(s,8,3);

Объяснение кода листинга программы

s:='информатика'; - присваиваем переменной s значение 'информатика'
s1:=copy(s,3,5); - копируем из переменной s первые 3 символа и сохраняем их в переменной s1
s2:=copy(s,8,3); - копируем из переменной s последние 3 символа и сохраняем их в переменной s2
print(s1); - выводим на экран значение переменной s1
print(s2); - выводим на экран значение переменной s2
gotox(10,10); - перемещаем курсор на позицию (10,10)
print('new word'); - выводим на экран строку 'new word'
gotox(10,10); - перемещаем курсор на позицию (10,10)
print(s1); - выводим на экран значение переменной s1
gotox(10,10); - перемещаем курсор на позицию (10,10)
print('new word'); - выводим на экран строку 'new word'
gotox(10,10); - перемещаем курсор на позицию (10,10)
print(s2); - выводим на экран значение переменной s2
gotox(10,10); - перемещаем курсор на позицию (10,10)
print('new word'); - выводим на экран строку 'new word'
gotox(10,10); - перемещаем курсор на позицию (10,10)
print(s1); - выводим на экран значение переменной s1
gotox(10,10); - перемещаем курсор на позицию (10,10)
print('new word'); - выводим на экран строку 'new word'
gotox(10,10); - перемещаем курсор на позицию (10,10)