Var a: array [1..100] of integer;
n, i, j: integer;
fout: text;
begin
assign(fout, 'output.txt');
rewrite(fout);
n := 10; //n - длина массива
for i := 1 to n do
a[i] := random(100);
for i := 1 to n do
write(fout, a[i], ' ');
writeln(fout);
j := 1;
for i := 2 to n do
if a[i] > a[j] then
j := i;
writeln(fout, 'max = ', a[j], ' max_ind = ', j);
j := 1;
for i := 2 to n do
if a[i] < a[j] then
j := i;
writeln(fout, 'min = ', a[j], ' min_ind = ', j);
close(fout);
<span>end.</span>
10 минут= 600 секунд
1 Кбайт= 1024 байта
1024 * 8 =8192 бита
8192/600=13 бит/с
Сумма = 0;
X=26;
ПОКА (X (< либо =)88)
{
Сумма = Сумма + X;
X = X+2
}
Целевой яп - C#. Реализован ввод с клавиатуры и проверка на корретность ввода. Пример работы программы приведен на рисунке 1. Код ниже.
using System;
namespace FindPairs
{
class Program
{
static void Main(string[] args)
{
Console.Write("Введите трехзначное число: ");
string input = Console.ReadLine();
int number = 0;
if(input.Length != 3 || !int.TryParse(input, out number))
{
Console.WriteLine("Неверный ввод. Экстренное завершение!");
return;
}
Console.WriteLine("Число, полученное при перестановке первой и второй цифры: {1}{0}{2}", input[0],input[1],input[2]);
}
}
}
Первоначально в ячейки с номерами от 0 до 99 были записаны числа от 1 до 100. Таким образом, в ячейке с номером 18 было записано значение 19.
19 - это нечетное простое число, следовательно, ячейка, в которой оно было записано, обнулится.
Ответ: а) 0