Родился в деревне гмины Блендов Гроецкого уезда Варшавской губернии Царства Польского. Работал банковским служащим, политическую деятельность начал в период нацистской оккупации. В 1942 году вступил в Польскую рабочую партию (ПРП). Был боевиком Гвардии Людовой, участвовал в экспроприациях. Выполнял функции секретаря Крайовой Рады Народовой.[2]
В январе—марте 1945 года Казимеж Мияль являлся уполномоченным новых властей в Лодзи, до 1947 года возглавлял администрацию Лодзи. В 1946 году получил несколько высоких государственных наград. В 1948—1950 годах — начальник канцелярии Болеслава Берута. В декабре 1948 года кооптирован в ЦК ПОРП.
С апреля 1950 года по ноябрь 1952-го Мияль возглавлял министерство коммунального хозяйства в правительстве Юзефа Циранкевича. В 1952—1956 годах руководил Аппаратом (поль.) Совета министров ПНР. Затем до февраля 1957 года снова был министром коммунального хозяйства.
Казимеж Мияль принадлежал к окружению Берута и являлся влиятельным проводником сталинистской политики в Польше. Был одним из лидеров консервативной «фракции натолинцев», противостоящей реформаторской «фракции пулавян».
Объяснение:
Типовая задача на разбор случаев. Разбирать случаи будем не простым последовательным перечислением, а более сложной конструкцией из вложенных условных операторов.
Решение задачи.
Var a1, b1, c1, {коэффициенты уравнения первой прямой}
a2,b2,c2, {коэффициенты уравнения второй прямой}
x, y : Real; {координаты точки пересечения }
BEGIN
ReadLn( a1, b1, c1);
ReadLn( a2, b2, c2);
If ( (a1=0) and (b1=0) ) or ( (a2=0) and (b2=0) )
then WriteLn( 'это не прямая (прямые). ' )
else
if (a1*b2=a2*b1) and (a1*c2=a2*c1) {условие совпадения}
then WriteLn( 'прямые совпадают.' )
else
if a1*b2 = a2*b1 {условие параллельности}
then WriteLn('прямые параллельны.')
else begin x:=(c1*b2-c2*b1)/(b1*a2-b2*a1);
y:=(c2*a1-c1*a2)/(b1*a2-b2*a1);
WriteLn('координаты точки пересечения :',
' x = ', x : 5 : 2 , ', y = ', y : 5 : 2);
end;
END.
i, n, prev, k: integer;
begin
//1
k := 0;
for i := 1 to 4 do
begin
read(n);
if n mod 2 = 0 then k := k + 1;
end;
writeln('K = ', k);
//2
k := 0;
for i := 1 to 3 do
begin
read(n);
if i = 1 then begin
prev := n;
k := k + 1;
end
else if n = prev then k := k + 1;
end;
if k = 3 then
writeln('Равносторонний')
else
writeln('Не равносторонний');
end.