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

Контрольная работа по информатике (9 класс)
Решите в день проведения контрольной (12.05.2020)

Задача № 1

Напишите компьютерную программу на Паскале, которая создает массив из 10 элементов, тип массива - целочисленный (integer). Далее, программа дает возможность пользователю, вручную, с клавиатуры, в цикле заполнить положительными и отрицательными значениями все элементы массива. Гарантируется, что положительные и отрицательные значения будут присутствовать в элементах массива после заполнения. Потом программа в цикле производит изменения в массиве: находит все элементы массива, значение которых больше нуля, и присваивает этим элементам значение 4.

Задача № 2

Напишите компьютерную программу, которая создает массив из 12 элементов, тип массива - вещественный (real). Программа дает возможность пользователю, вручную, с клавиатуры, в цикле заполнить положительными и отрицательными значениями все элементы массива. Гарантируется, что положительные и отрицательные значения будут присутствовать в элементах массива после заполнения. Далее, программа находит
сумму всех элементов массива, значение которых меньше нуля,
среднее арифметическое значение всех элементов этого массива.
Полученные результаты, указанная сумма и среднее арифметическое значение, программой выводятся на экран.

👇
Открыть все ответы
Ответ:
temnikovay01
temnikovay01
17.11.2022

#include <iostream>

using namespace std;

int cube( int numb ){

   return(numb*numb*numb);

}

int summ( int a, int b){

   return(a+b);

}

int multiplication(int a, int b){

   return(a*b);

}

int compare(int a, int b){

   if (a > b) return a;

   else return b;

}

int main()

{

 int num;

 int num1;

 cin >> num >> num1;

 cout << "cube(" << num << ") =" << cube(num) << endl;

 cout << "n1 + n2 = " << summ(num, num1)<< endl;

 cout << "n1 * n2 = " << multiplication(num, num1)<< endl;

 cout << "the largest number is " << compare(num, num1)<< endl;

// в условии не указано что делать в случае равенства.

}

4,6(63 оценок)
Ответ:
Крипер1111111
Крипер1111111
17.11.2022
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  var a:=MatrixRandom(7,7,0,9);
  var k:=0;
  for var i:=0 to 6 do begin
    for var j:=0 to 6 do begin
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.

Тестовое решение:
  2  1  7  3  3  2  7
  9  2  9  2  0  5  5
  4  2  6  9  4  6  0
  1  0  3  5  4  5  9
  6  3  6  0  2  0  8
  0  8  4  3  2  1  8
  6  0  4  4  5  4  0
Кол-во элементов на [1,5]: 27

Вариант "совсем для школы"

const
  n=7;
var
  a:array[1..n,1..n] of integer;
  i,j,k:integer;
begin
  Randomize;
  k:=0;
  for i:=1 to n do begin
    for j:=1 to n do begin
      a[i,j]:=Random(10);
      Write(a[i,j]:3);
      if a[i,j] in [1..5] then Inc(k)
      end;
    Writeln
    end;
  Writeln('Кол-во элементов на [1,5]: ',k)
end.
4,8(31 оценок)
Это интересно:
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ