Наведіть приклади повідомлень , які людина сприймае органами зору , слуху, дотику нюху , смаку.

Смакові- солодкий кавун, солоний огірок; нюху- запах парфумів, їжі; дотику- гострий ніж, гладка поверхня; слуху- спів птахів, слухати музику; зору- зелена ялинка, кругле сонце; комбінований- тверде червоне солодке яблуко.

// программа на паскале var   s: string;   k, i: integer; begin   readln(s);   k : = pos(',', s);   if (k < 2) or (k = length(s)) then writeln('no')   else   begin     for i : = 1 to length(s) do       if (i < > k) and ((s[i] < '0') or (s[i] > '9')) then       begin         writeln('no');         exit       end;     writeln('yes');   end; end. примеры работы программы: ввод     вывод 1,6              yes 123,         no ,49             no 0,758       yes

// pascalabc.net 3.1, сборка 1250 от 28.05.2016 begin   seqgen(73,3,x-> x+8).tabulate(x-> sin(x)+1).println(newline) end. результат (3,1.14112000805987) (11,9.79344929652459e-06) (19,1.14987720966295) (27,1.9563759284045) (35,0.571817330503849) (43,0.168225257371402) (51,1.67022917584337) (59,1.63673800713914) (67,0.144480021024678) (75,0.61221836459057) (83,1.96836446110019) (91,1.10598751175116) (99,0.000793165813646302) (107,1.18478174456067) (115,1.94543533402477) (123,0.540096509310409) (131,0.1883966128633) (139,1.69608013122474) (147,1.60904402188329) (155,0.126688017225352) (163,0.645089824155065) (171,1.97659086794357) (179,1.07072216723899) (187,0.00282897660785097) (195,1.21945466799406) (203,1.93330970016696) (211,0.508952146149537) (219,0.209585258506819) (227,1.72105859707063) (235,1.58058664098964) (243,0.109990651143723) (251,0.678406139707496) (259,1.98359318394668) (267,1.03536817725618) (275,0.00611467408027389) (283,1.25385251979023) (291,1.92001422549596) (299,0.47842327838163) (307,0.231764635762553) (315,1.74513326455741) (323,1.55140153386739) (331,0.0944088518029327) (339,0.712125551491514) (347,1.98936263217831) (355,0.999969855646641) (363,0.0106461398305572) (371,1.28793218456003) (379,1.9055655749933) (387,0.448548171885085) (395,0.254906944275786) (403,1.76827395771179) (411,1.52152528208153) (419,0.0799621499383943) (427,0.746205794496806) (435,1.9938919810239) (443,0.96457157182102) (451,0.0164176939717596) (459,1.32165094574031) (467,1.88998185906867) (475,0.419364273092607) (483,0.278983176722363) (491,1.79045167123434) (499,1.49099533350029) (507,0.0666686535173281) (515,0.780604151435442) (523,1.9971755532499) (531,0.929217695142592) (539,0.0234221022497116) (547,1.35496653913623) (555,1.87328261085979) (563,0.390908162054621) (571,0.303963155167414) (579,1.81163860685574)