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

Написать программу для решения следующей задачи. N чертят наколдовали M яблок. Определить:
1. Сколько яблок досталось каждому чертенку, если они разделили их поровну. Резать яблоки старый черт им не разрешил.
2. Сколько яблок осталось после дележки
3. Сколько яблок нужно еще наколдовать, чтобы после деления остатка не было.
Всё это нужно на языке Паскаль.

👇
Ответ:
Nezox1123
Nezox1123
11.11.2021

1) M / N

2) M % N

3) M - M % N

4,4(46 оценок)
Открыть все ответы
Ответ:
yaroslav9453
yaroslav9453
11.11.2021

Как я понял,нужно было вывести главную и побочную диагонали.

Ошибки:

пропущены скобки,как обычные так и фигурные;пропущены знаки ";","<" и т.д.;

Легче было заново написать чем исправлять.

Вот мой код:

import java.util.Scanner;

public class Main{

public static void main (String [] args){

 Scanner in = new Scanner (System.in);

 int n = in.nextInt();  

 int mass[][] = new int [n][n];

 int i,j;

 

 for(i=0;i<n;i++){

  for(j=0;j<n;j++){

   mass[i][j]=in.nextInt();

  }

 }

 

 for(i=0;i<n;i++){

  for(j=0;j<n;j++){

   if((i==j) || j==(n-1-i)){

    System.out.print("x");

   }else System.out.print(mass[i][j]);

   

  }

  System.out.println();

 }

 

 in.close();  

}

}

Объяснение:

Краткий алгоритм программы:Импортируем Scanner;Объявляем переменную in типа Scanner,для ввода;Объявляем переменную n типа int,для хранения размера массива;Объявляем две переменные i и j типа int,для циклов;В первом "двойном" цикле мы заполняем массив числами;Во втором "дойном" цикле мы мы сравниваем индексы массива и выводим результат;Закрываем Scanner;
4,4(64 оценок)
Ответ:
патося37
патося37
11.11.2021
//Pascal ABC.NET v3.0 сборка 1111

Const
 n=7;

Var
 ar:array[1..n] of integer; //массив дней
 i,k:integer;
 sr:real;
begin
k:=0; //счётчик превысивших
 for i:=1 to n do
   begin
   readln(ar[i]); //вводим дни
   sr:=sr+ar[i]; //заодно вычисляем сумму дневных температур
  end;
 sr:=sr/n; {делим сумму на количество дней, получаем среднюю температуру}
 for i:=1 to n do
   if sr<ar[i] then inc(k); {если температура некотрого для выше средней, увеличиваем счётчик}
 writeln('Средняя температура=',sr,', за неделю ', k,' дней превысили эту температуру');
end.

Пример ввода:
1
2
...
7
Пример вывода:
Средняя температура=4, за неделю 3 дней превысили эту температуру
4,7(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ