Впаскаль авс: найти плотность тела, если известны масса и объём

Var m,v: integer; begin write('m='); readln(m); write('v='); readln(v); writeln('p=',m/v); end.

Program plotnost; var a,b,c : real; begin writeln('введите значение массы и объёма соответственно и через пробел'); reagln(a,b); c: =a/b; writeln('p=' , c); end.

Еда                                     напитки               всего бутер                                             кофе                     2 пряник плюшка                                                                         4                                             сок                           2         кекс

#include "stdafx.h" #include < iostream> using namespace std; int main() { setlocale(lc_all, "rus"); float a, b, c, x1, x2; cout < < "введите основную сторону: \n"; cin > > a; cout < < "введите две других: \n"; cin > > b; cin > > c; cout < < "введите углы: \n"; cin > > x1; cin > > x2; if (a*a == b*b + c*c) cout < < "прямоугольный\n"; if (a*a < b*b + c*c) cout < < "остроугольный\n"; if (a*a > b*b + c*c) cout < < "тупоугольный\n"; if (x1 == x2) cout < < "равнобедренный\n"; if (a == b & & b == c) cout < < "равносторонний \n"; system("pause"); return 0; }