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

Узнай цену своей работы

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

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

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

textual
Листинг программы
s:='информатика';
s1:=copy(s,3,5);
s2:=copy(s,8,3);

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

  1. s:='информатика'; - присваиваем переменной s значение 'информатика'
  2. s1:=copy(s,3,5); - копируем из переменной s первые 3 символа и сохраняем их в переменной s1
  3. s2:=copy(s,8,3); - копируем из переменной s последние 3 символа и сохраняем их в переменной s2
  4. print(s1); - выводим на экран значение переменной s1
  5. print(s2); - выводим на экран значение переменной s2
  6. gotox(10,10); - перемещаем курсор на позицию (10,10)
  7. print('new word'); - выводим на экран строку 'new word'
  8. gotox(10,10); - перемещаем курсор на позицию (10,10)
  9. print(s1); - выводим на экран значение переменной s1
  10. gotox(10,10); - перемещаем курсор на позицию (10,10)
  11. print('new word'); - выводим на экран строку 'new word'
  12. gotox(10,10); - перемещаем курсор на позицию (10,10)
  13. print(s2); - выводим на экран значение переменной s2
  14. gotox(10,10); - перемещаем курсор на позицию (10,10)
  15. print('new word'); - выводим на экран строку 'new word'
  16. gotox(10,10); - перемещаем курсор на позицию (10,10)
  17. print(s1); - выводим на экран значение переменной s1
  18. gotox(10,10); - перемещаем курсор на позицию (10,10)
  19. print('new word'); - выводим на экран строку 'new word'
  20. gotox(10,10); - перемещаем курсор на позицию (10,10)

Оцени полезность:

12   голосов , оценка 4.167 из 5
Похожие ответы