На Pascal'e:
var a,b,c,d: integer;
begin
Write('Введите вес человека: '); readln(a);
Write('Введите рост человека'); readln(b);
Write('Введите окружность грудной клетки человека'); readln(c);
d:=(b*c)/240;
if a=d then
begin
Write('Вес человека нормальный');
end
else
write('Вес человека не нормальный');
end.
на фото блок-схема программы(алгоритм)
Виноват водитель "Форда"
////
База данных содержит в себе информацию в виде строк и стобцов(может содержать в себе множество таблиц).
Однотабличная- только одну.