Числа a и b выражают длины катетов одного прямоуголь­ного треугольника, с и d  —  другого. определите, являются ли тре­уголь­ни­ки являются подобными.

составьте блок- схему.
​

varslovo,simval: string; i,k: integer; begink: =0; write('vvedite slovo '); readln(slovo); write('vvedite simval '); readln(simval); for i: =1 to length(slovo) dobeginif slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln(i,' '); end; if k> =1 thenwriteln('yes vstre4aets9 ',k,' raz, na pozicii ',i)else writeln('no'); writeln; end.вот в одном решении

папирусы хранили в виде свитков, сворачивая длинную папирусную ленту, склеенную из отдельных листов, в трубку. 

var

i,s: integer;

begin

s: =0;

for i: =2 to 5 do

s: =s+i*i;

writeln(s);

end.

4)¬a λ b λ ¬c: только это логическое выражение будет равносильно начальному