Задание 15 Параграф 4.3 ГДЗ Босова 8 класс 2023 (Информатика)
15. Разработайте и отладьте программу, которая из слова ИНФОРМАТИКА получает слова ФОРМА, ФИРМА, МАК и подсчитывает общее количество символов в этих словах.

Ниже вариант решения задания из учебника Босова, Босова 8 класс, Бином:
15. Разработайте и отладьте программу, которая из слова ИНФОРМАТИКА получает слова ФОРМА, ФИРМА, МАК и подсчитывает общее количество символов в этих словах.
var
st, st1, st2, st3: string;
k: integer;
begin
st := taskИНФОРМАТИКАtask;
st1 := copy(st, 3, 5);
st2:=copy(st,3,1)+copy(st,1,1)+copy(st,5,3);
st3:=copy(st,6,2)+copy(st,10,1);
k:=length(st1)+length(st2)+length(st3);
writeln(st1,task task,st2,task task,st3);
write(taskОбщее количество символов: task,k)
end.
Окно вывода
ФОРМА ФИРМА МАК
Общее количество символов: 13
