(программа диалог с компьютером) пример
Program: P1
var Name: string;
Age: integer;
begin
write ( 'Укажите ваше имя : ') ;
readin (Name) ;
writeln ( 'Здравствуйте , ' , Name) ;
write ( ' Укажите ваш возраст: ') ;
readin(Age);
wrire ( ' Через два года вам будет: ' , Age + 2 ) ;
end.
1)Самостоятельно создать такую программу по примеру ☝️
2) ответить на во что будет, если вместо имени ввести цифры?
что будет, если на во о возрасте ввести букву?
Более удобный, компактный и требующий меньше памяти код, чем у предыдущего ответа.
Пояснение:
1) вводятся два числа и забиваются в значения a и b соответственно.
2)при команды else производится отбор. Если а больше b, то идет запись, если нет, то идет другое else, где если a меньше b, то идет запись их. В конечном случае, если не выполняется ни то, ни то, то просто выводится, что они равны, т.к больше нет никаких вариантов.
Код:
Program school6;
var a,b:real;
begin
write ('Введите первое число:');
readln(a);
write ('Введите второе число:');
readln(b);
if a>b then
write ('Первое число больше второго на ', a-b)
Else
If a<b then
write ('Второе число больше первого на ', b-a)
Else Write('числа равны');
end.
/*Решение с обобщения формула Брахмагупты для произвольного четырехугольника. Функция perimeter(double x[], double y[]) возвращает значение периметра, функция area(double x[], double y[]) возвращает значение площади, пример использования и реализация приведены ниже. */
#include <iostream>
#include <math.h>
double perimeter(double x[], double y[]);
double area(double x[], double y[]);
int main()
{
double x[4], y[4];
std::cout << "Quadrangle ABCD\n";
for (auto i = 0; i < 4; i++)
{
std::cout << "Input coordinates of point " << char(i + 'A') << ": ";
std::cin >> x[i] >> y[i];
}
std::cout << perimeter(x, y) << " " << area(x, y);
return 0;
}
double perimeter(double x[], double y[])
{
double a[4], p = 0;
for (auto i = 0; i < 4; i++)
{
a[i] = sqrt((x[i]-x[(i + 1) % 4]) * (x[i]-x[(i + 1) % 4]) + (y[i]-y[(i + 1) % 4]) * (y[i]-y[(i + 1) % 4]));
p += a[i];
}
return p;
}
double area(double x[], double y[])
{
double a[4], p = 0, s = 1, d[2];
for (auto i = 0; i < 4; i++)
{
a[i] = sqrt((x[i]-x[(i + 1) % 4]) * (x[i]-x[(i + 1) % 4]) + (y[i]-y[(i + 1) % 4]) * (y[i]-y[(i + 1) % 4]));
p += a[i];
}
for (auto i = 0; i < 4; i++)
{
s *= (p / 2- a[i]);
}
for (auto i = 0; i < 2; i++)
{
d[i] = sqrt((x[i]-x[i + 2]) * (x[i]-x[i + 2]) + (y[i]-y[i + 2]) * (y[i]-y[i + 2]));
}
s -= (a[0] * a[2] + a[1] * a[3] + d[0] * d[1]) * (a[0] * a[2] + a[1] * a[3] - d[0] * d[1]) / 4;
s = sqrt(s);
return s;
}