ДАЮ 34 БАЛЛА !!! ИНФОРМАТИКА ПОМОГИТЕ ) pascalИсследователи решили проанализировать участки
ДАЮ 34 БАЛЛА !!! ИНФОРМАТИКА ПОМОГИТЕ ) pascal
Исследователи решили проанализировать участки ДНК 2-ух образцов. Каждый участок ДНК имеет некоторый состав нуклеотидов. Нуклеотиды ДНК образованы одним из следующих азотистых оснований: аденин, гуанин, тимин, цитозин, которые кодируются в цепочках ДНК при помощи заглавных букв по первой буковке основания А, Г, Т, Ц, соответственно. Помогите учёным определить долю расхождений в цепочках ДНК, если под расхождением понимается неравенство подходящих нуклеотидов в цепочках, находящихся на одной позиции, считая от левого края. Формат входных данных На вход программке подаётся целое число N (1N107). Потом две строчки в каждой из которых записана цепочка длиной N из латинских букв A, G, T, C, подходящих азотистым основаниям. Формат выходных данных Единственное число ответ на задачку с точностью не ниже 107. Система оценки Баллы за задачку будут начисляться пропорционально количеству удачно пройденных тестов.
Sample Input: 10 AGTCCGTCAG
AGTGCCTCAG
Sample Output: 0.2
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018
Внимание! Если программка не работает, обновите версию!
begin
var n := ReadlnInteger;
var s1 := ReadlnString;
var s2 := ReadlnString;
var k := s1.Zip(s2, (a, b)-gt; a lt;gt; b).Where(t -gt; t = True).Count;
Writeln(Round(k / n, 7))
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Русский язык.
Разные вопросы.
Қазақ тiлi.
Английский язык.
Математика.
История.
Экономика.
Экономика.
Русский язык.
Разные вопросы.