Question

Из слов КЛАРА и НЕТ создать слова КЛАРНЕТ и КЛАН. СРОЧНО​ на паскале

Answer 1

Відповідь:

Код нижче

Пояснення:

program create_words;

var

 s1, s2, s3, s4: string;

begin

 s1 := 'КЛАРА';

 s2 := 'НЕТ';  

 // Створення слова "КЛАРНЕТ"

 s3 := Copy(s1, 1, 4) + 'Н' + Copy(s1, 6, 1) + 'ЕТ';

 WriteLn(s3);

 // Створення слова "КЛАН"

 s4 := Copy(s1, 1, 4) + s2[1];

 WriteLn(s4);

end.