Var a, b, c, S1, fin: integer;
S1 := edit1.text;
a := copy(S1,1,1);
b := copy(S1,2,1);
c := copy(S1,3,1);
fin := a + b + c;
edit2.text := fin;
На нажатие кнопки добавить код.
1. дом.bmp. потому что это графический файл, а все остальные текстовые.
2. лето.Jpg, это графический файл, потому что к графическим файлам относятся: bmp. jpg. gif.
Дай мне своего автора книги все щас кину решения и объясню все !!