1
//Вводим a,b,c
Console.WriteLine(hello);
if(a == b || a==c || b==c){
Console.WriteLine("Треугольник равнобедренный");
}else{
Console.WriteLine("Треугольник НЕ равнобедренный");
}
2
int x1,x2,x3,x4;
int x;
//Вводим число x
x1 = (x - (x % 1000)) / 1000;
x2 = ((x - (x % 100)) - (x - (x % 1000))) / 100;
x3 = ((x - (x % 10)) - (x - (x % 100))) / 10;
x4 = x % 10;
if((x1 == 6) || (x1 == 9) || (x2 == 6) || (x2 == 9) || (x3 == 6) || (x3 == 9) || (x4 == 6) || (x4 == 9)){
Console.WriteLine("Входит");
}else{
Console.WriteLine("не входит");
}
3
float x,y,z;
// Вводим x,y,z
if(x >= 0,5 && x<=5,1) Console.WriteLine(x, " Входит");
if(y >= 0,5 && y<=5,1) Console.WriteLine(y, " Входит");
if(z >= 0,5 && z<=5,1) Console.WriteLine(z, " Входит");
4 задания к сожалению не понял
i:integer;
t:array[1..3,0..31]of real;
begin
write('Введите температуру в декабре по дням: ');
for i:=1 to 31 do
begin
readln(t[1,i]);
t[1,0]:=t[1,0]+t[1,i];
end;
t[1,0]:=t[1,0]/31;
write('Введите температуру в январе по дням: ');
for i:=1 to 31 do
begin
readln(t[2,i]);
t[2,0]:=t[2,0]+t[2,i];
end;
t[2,0]:=t[2,0]/31;
write('Введите температуру в феврале по дням: ');
for i:=1 to 28 do
begin
readln(t[3,i]);
t[3,0]:=t[3,0]+t[3,i];
end;
t[3,0]:=t[3,0]/28;
writeln('Средняя температура в декабре: ',t[1,0]);
writeln('Средняя температура в январе: ',t[2,0]);
writeln('Средняя температура в феврале: ',t[3,0]);
writeln('Средняя температура зимой: ',(t[1,0]+t[2,0]+t[3,0])/3);
end.