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

Program z1; var a,b,c: real; begin writeln('введите 2 числа'); readln(a,b); if(a> b)then c: =a/b; writeln(c); else (c: =b/a; writeln(c); ) end. где ошибка

👇
Ответ:
ааа515
ааа515
22.03.2023
Program z1;
var a,b,c:real;
begin
writeln('введите 2 числа');
readln(a,b);
if (a>b) then c:=a/b
else c:=b/a;
writeln(c);
end.
4,6(92 оценок)
Открыть все ответы
Ответ:
kamilfox
kamilfox
22.03.2023
1. Занести в пару смежных ячеек, например, по вертикали, начальное значение аргумента (х) и следующее за ним (т.е. нчальное плюс шаг).
2. Выделить обе этих ячейки и мышью за правый нижний угол перетазить выделение вниз на нужное число ячеек так, чтобы в последней из ячеек появилось конечное значение аргумента х.
3. Пусть (для определенности) начальное значение у нас находится в ячейке А1. Тогда становимся в ячейку В1 и там пишем формулу =(A1^3-A1)*(A1^2+5)
4. После нажатия Enter в В1 должно появиться значение функции, вычисленное для аргумента А1.
5. Становимся мышью в правый нижний угол ячейки В1 и перетаскиваем курсор вниз, размножая формулу до строки с последним значением аргумента. Во всех ячейках колонки В появятся вычисленные значения.
6. Выделяем мышкой область от А1 до Вхх - последней строки, содержащий значения функции.
6. Щелкаем иконку мастера графиков. Выбираем нужный вид графика, а дальше идем по шагам мастера, там все понятно написано. не забываем только отметить, что данные у нас в столбцах, столбец А надо взять для значений оси Х, а график строить по данным из колонки В.
7. Любуемся построенным графиком.
4,5(23 оценок)
Ответ:
Violettka181
Violettka181
22.03.2023
Const Sz = 1000; var   a: array [1..Sz] of integer;  b: array [1..Sz] of integer;  c: array [1..Sz] of integer;  d: array [1..Sz] of integer;  M: integer;  N: integer;  i: integer;  k: integer;begin  read(M);  readln(N);  for i:=1 to N do begin    read(a[i]);    readln(b[i]);    if (a[i]<>0) then c[i]:=1 else c[i]:=0;    end;  for i:=1 to N do begin  if(c[i]<>0) then begin  for k:=1 to i do begin  if(d[k]=0) then d[i]:=1;  if (c[k]=i) then d[k]:=0;   end;   writeln(d[i])  end;end;end.
4,5(88 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ