Не совсем если честно понятно было но вот: uses crt; var y :real; S,price1,price2,price3:integer; x1,x2,x3:integer; k,i:real; begin x1 := 1; x2:= 2; x3 := 3; writeln('Среднее арифм. x1,x2,x3 = ', (x1/x2/x3)/3); k := 15.24; k := k - 1/2; writeln('Уменьшили значение k 15.24 на 1/2'); i := 15.24; i := i + 1/2; writeln('Увеличили значение i 15.24 на 1/2'); price1:=150; // 1 галстук. price2:=250; // 1 блузка price3 := 550; // 1 брюки writeln('Пять брюк будут стоить: ', price3*5); writeln('Пять галстуков будут стоить: ', price1*5); writeln('Пять блузок будут стоить: ', price2*5); { ответы на вопросы: a) 1 - раздел модулей, 2 - раздел объявления типов и переменных, 3 - тело программы. б) 1200 - целое число, тип integer, 1200.78 - вещественный тип real } end.
using namespace std;
int main(){
int Angle1= 0, Angle2 = 0, Angle3;
cin >> Angle1;
cin >> Angle2;
Angle3 = 180 - (Angle1 + Angle2);
if ((Angle1 == 90) | (Angle2 == 90) | (Angle3 == 90))
{
cout << "Pryamougolniy" << endl;
}
if ((Angle1 > 90) | (Angle2 > 90) | (Angle3 > 90))
{
cout << "Tupougolniy" << endl;
}
if ((Angle1 == Angle2) && (Angle2 == Angle3))
{
cout << "Ravnostoronniy" << endl;
}
if (((Angle1 == Angle2) & (Angle2 != Angle3)) | ((Angle1 == Angle3) & (Angle1 != Angle2)) | ((Angle2 == Angle3) & (Angle2 != Angle1)))
{
cout << "Ravnobedrenniy" << endl;
}
system("pause");
}
uses crt;
var y :real;
S,price1,price2,price3:integer;
x1,x2,x3:integer;
k,i:real;
begin
x1 := 1; x2:= 2; x3 := 3;
writeln('Среднее арифм. x1,x2,x3 = ', (x1/x2/x3)/3);
k := 15.24; k := k - 1/2;
writeln('Уменьшили значение k 15.24 на 1/2');
i := 15.24; i := i + 1/2;
writeln('Увеличили значение i 15.24 на 1/2');
price1:=150; // 1 галстук.
price2:=250; // 1 блузка
price3 := 550; // 1 брюки
writeln('Пять брюк будут стоить: ', price3*5);
writeln('Пять галстуков будут стоить: ', price1*5);
writeln('Пять блузок будут стоить: ', price2*5);
{
ответы на вопросы:
a) 1 - раздел модулей, 2 - раздел объявления типов и переменных, 3 - тело программы.
б) 1200 - целое число, тип integer, 1200.78 - вещественный тип real
}
end.