М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
whitehawk1508
whitehawk1508
21.05.2020 09:12 •  Информатика

Написать код программы с использованием цикла while на pascalabc. определить все значения при условии δx=1,005 (шаг)

👇
Ответ:
Ilona004
Ilona004
21.05.2020
Const
  x0 = 1.909;
  x1 = 6.23;
  step = 1.005;
  t=10;
var
  i: real;
begin
  i:=0;
  while i<(x1-x0)/step do
  begin
    writeln('a(', x0+i, ') = ', sqrt(1+sqr(x0+i))+t);
    i:=i+step;
  end;
  if (x0+i-step)<(x1) then writeln('a(', x1, ') = ', sqrt(1+sqr(x1))+t)
end.
4,8(39 оценок)
Открыть все ответы
Ответ:
Vasilisa5111
Vasilisa5111
21.05.2020
Program Task;
Const N = 499; M = 1;
Var A: Array [1..N, 1..N] of Boolean;
i, j, x, y, t: Integer;
b: Boolean;
Begin
Randomize;
While i < M Do
Begin
x := Random(N) + 1;
y := Random(N) + 1;
If A[x, y] = False Then
Begin
A[x, y] := True;
i := i + 1;
End;
End;
While b = False Do
Begin
b := True;
For i := 1 To N Do
For j := 1 To N Do
Begin
If A[i, j] = True Then
Begin
If (i + 1) <= N Then
A[i + 1, j] := True;
If (i - 1) > 0 Then
A[i - 1, j] := True;
If(j + 1) <= N Then
A[i, j + 1] := True;
If (j -1) > 0 Then
A[i, j - 1] := True;
End;
End;
For i := 1 To N Do
For j := 1 To N Do
If A[i, j] = False Then
b := False;
t := t + 1;
End;
WriteLn(t);
ReadLn;
End.
4,7(22 оценок)
Ответ:
Tumutova2006
Tumutova2006
21.05.2020
Ключевое поле — это одно или несколько полей, комбинация значений которых однозначно определяет каждую запись в таблице. ... Ключевые поля используются для быстрого поиска и связи данных из разных таблиц при запросов, форм и отчетов.

2 Если в отношении имеется единственный потенциальный ключ, он является и первичным ключом

7 В области навигации щелкните таблицу или запрос, на основе которых вы хотите создать отчет. На вкладке Создание в группе Отчеты выберите Отчет. Access создаст отчет и отобразит его в режиме макета

только на 3 вопроса смогла ответить

4,5(75 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ