Var f1: text; f2: text; s1,s2: string; k1,k2: integer; begin; assign(f1,'f1.txt'); reset(f1); while not eof(f1) do read(f1,s1); close(f1); assign(f2,'f2.txt'); reset(f2); while not eof(f2) do read(f2,s2); close(f2); while pos(',',s1)< > 0 do begin; delete(s1,pos(',',s1),1); inc(k1); end; while pos(',',s2)< > 0 do begin; delete(s2,pos(',',s2),1); inc(k2); end; if k1> k2 then writeln('в первом'); if k2> k1 then writeln('во втором'); if k2=k1 then writeln('равно'); end.
myxa120283
14.07.2020
Рассмотрим пример решения : однажды винни-пух захотел полакомиться медом и пошел к пчелам в гости. по дороге нарвал букет цветов, чтобы подарить труженицам пчелкам. пчелки обрадовались, увидев мишку с букетом цветов, и сказали: «у нас есть большая бочка с медом. мы дадим тебе меда, если ты сможешь с двух сосудов вместимостью 3 л и 5 л налить себе 4 л! » винни-пух долго думал, но все-таки смог решить . как он это сделал? решение: как в результате можно получить 4 л? нужно из 5-литрового сосуда отлить 1 л. а как это сделать? нужно в 3-литровом сосуде иметь ровно 2 л. как их получить? – из 5-литрового сосуда отлить 3 л. решение лучше и удобнее оформить в виде таблицы: ходы1234565 л522-543 л-3-223 наполняем из бочки 5-литровый сосуд медом (1 шаг). из 5-литрового сосуда отливаем 3 л в 3-литровый сосуд (2 шаг). теперь в 5-литровом сосуде осталось 2 литра меда. выливаем из 3-литрового сосуда мед назад в бочку (3 шаг). теперь из 5-литрового сосуда выливаем те 2 литра меда в 3-литровый сосуд (4 шаг). наполняем из бочки 5-литровый сосуд медом (5 шаг). и из 5-литрового сосуда дополняем медом 3-литровый сосуд. получаем 4 литра меда в 5-литровом сосуде (6 шаг). решена. поиск решения можно было начать с такого действия: к трем литрам добавить 1 литр. но тогда решение будет выглядеть следующим образом: ходы123456785 л-335-1143 л3-311-3-( по этому примеру реши)
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Составь пары противоположных по смыслу высказываний и впиши пропущенные слова и стина\ лож люди люди