В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
vita9251
vita9251
29.07.2021 12:53 •  Информатика

Ввести с клавиатуры целые c1,c2,c3 и действительные s1,s2 числа Вычислить:

Введенные величины и результаты расчетов вывести на экран белым цветом повышенной яркости на желтом фоне с пятой позиции четвертой строки экрана/.Экран предварительно окрасить синим цветом
Вещественные(действительные) переменные A,B- с 3-мя и C--6-ю знаками в дробной части.
Проверить вручную или с калькулятора верность выполнения расчетов в созданном приложении

Показать ответ
Ответ:
tamila2002саша2004
tamila2002саша2004
17.05.2022 01:39
Var
  arr : array [1..30] of integer;
  sum, count, i, a : integer;
begin
  read (a);
  for i := 1 to 30 do read (arr[i]);
  count := 0; sum := 0;
  for i := 1 to 30 do
  begin
    if arr[i] < 0 then sum := sum + arr[i]
    else if (arr[i] > 0) and (arr[i] <= a) then count := count + 1;
  end;
  writeln (sum, ' ', count);
end.

var
  arr : array [1..30] of integer;
  i : integer;
begin
  for i := 1 to 30 do read (arr[i]);
  for i := 30 downto 2 do
    if arr[i] * arr[i - 1] < 0 then // проверка знака
    begin
      writeln (i - 1); 
      halt; // Остановка программы
    end;
  writeln ('-1'); // Таких нет
end.
0,0(0 оценок)
Ответ:
grht1
grht1
03.10.2021 10:23

Неа

Написать приложение Windows, которое по заданным в файле исходным данным строит

график или столбиковую диаграмму.

Приложение, должно позволять работать с командами Input data, Choose, Line, Bar,

Quit.

При запуске приложения сделать недоступной команды Line и Ваг. При выборе

команды Quit завершать работу приложения. При выборе команды Input data читать из

файла исходные данные (файл сформировать самостоятельно). При выборе команды

Choose открывать окно диалога, содержащее:

список для выбора цвета графика типа TListBox;

группу из двух переключателей (Line,-Bar) типа TRadioGroup;

кнопку типа TButton.

Обеспечить возможность ввода цвета и выбора режима: построение графика (Line) или

столбиковой диаграммы (Ваг). После указания параметров сделать доступной

соответствующую команду меню.

По команде Line или Ваг в главном окне приложения строить выбранным цветом график

или диаграмму, причем окно должно содержать заголовок графика или диаграммы,

наименование и градацию осей, а изображение — занимать все окно и масштабироваться

при изменении размеров окна.

СКИНЬТЕ ДОКУМЕНТОМ. DELPHI

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота