установите соответствие между определением и названием Это приложение, обрабатывающие информацию, которую можно представить в виде таблиц и автоматизировать обработку таких данных Это специальные пакеты программ, обрабатывающие информацию, которую можно представить в виде таблиц Это файл, в котором на отдельных листах хранится информация (данные) Это составная часть книги Excel, состоящая из строк и столбцов, на пересечении которых находятся ячейки Это расширение файлов, созданных в электронной таблице Excel Это основная единица хранения данных, образующаяся на пересечении столбца и строки рабочего листа 1 Электронные таблицы или табличные процессоры 2 Excel 3 .xlsx 4 Рабочая книга Excel 5 Ячейка 6 Рабочий лист сор
import java.util.Scanner;
import java.util.ArrayList;
public class multi {
public static void main(String[] args) {
int counter = 0;
ArrayList<Integer> arr = new ArrayList<>();
Scanner scanner = new Scanner(System.in);
for (int i = 1; i<=6; i++) {
while (true) {
System.out.print("Введите " + i + "-е значение: ");
int v = Integer.parseInt(scanner.nextLine());
if (v == 0) counter++;
else counter = 0;
if (i == 6 && counter >= 6) {
System.out.println("Все значения не могут быть равны 0!");
continue;
}
arr.add(v);
break;
}
}
System.out.println(arr);
System.out.println(multiply(arr));
}
public static Integer multiply(ArrayList<Integer> arr) {
int v = 0;
for (int i : arr) {
if (i != 0) {
if (v == 0) v = i;
else v *= i;
}
}
return v;
}
}
Var i, n, max : Integer;
a : array [1..30] of Integer;
begin
for i := 1 to 30 do
begin
Write('a[', i, ']=');
a[i]:=i+1;
if max<a[i] then max:=a[i];
writeln(a[i]);
end;
writeln('Максимальный элемент равен: ',max);
end.
Если нужно будет ввести последовательность с клавиатуры, то вот:
Var i, n, max : Integer;
a : array [1..30] of Integer;
begin
for i := 1 to 30 do
begin
Write('a[', i, ']=');
ReadLn (a[i]);
if max<a[i] then max:=a[i];
end;
writeln('Максимальный элемент равен: ',max);
end.