Создать блок-схему к программу паскаль .cпасибо заранее
program p20;
var a,b,c: real; i,n: integer;
function f(x: real): real;
begin
f: =sqr(x)*x*sqr(x)+1;
end;
begin
a: =0; b: =1; n: =20;
for i: =1 to n do begin
c: =(b+a)/2;
writeln('i=',i: 3,'x=',c: 10: 8,
'f(x)=',f(c): 12: 8);
if f(c)=0 then break
else if f(c)*f(0)> 0 then
a: =c else b: =c; end;
end.
1.
program asd;
uses crt;
var
a: array[1..10] of integer;
i:integer;
sum:integer;
begin
writeln('Введите 10 цифр по очереди');
for i:=1 to 10 do
begin
readln(a[i]);
if (a[i]>7) then begin a[i]:=7; sum:=sum+1; end;
end;
writeln(' ',sum);
end.
2. смысл задания? 10/2=5 или индексами ты имела ввиду значениями?
3.
program asd;
uses crt;
var
a: array[1..10] of integer;
i:integer;
naib:integer;
begin
writeln('Введите 10 цифр по очереди');
for i:=1 to 10 do
begin
readln(a[i]);
if (a[i]>naib) then naib:=a[i];
end;
writeln(' ',naib);
end.
Таблица может иметь например такую структуру:
Участники
id (int "PRIMARY KEY"), surname (char), date_registration (date), confirm (bool)
В таблицу заносятся участники конференции
Описание полей:
id- идентификатор участника, числовой (целый), нужен для того чтобы можно было занести в базу данных 2 участников с одинаковой фамилией и суметь различить их.
surname - фамилия участника (тип данных символьный)
date - дата регистрации участника
confirm - поле определяющее поступила ли оплата участия в конференции от участника (FALSE - не поступала, TRUE - поступала)
Как может выглядеть таблица смотри в приложении
Кроме того можно заменить поле confirm на поле "пол" для определения как обращаться к людям с фамилией например Бондарь (если допусти False, то считаем что мужчина, если True, то женщина, можно и наоборот)