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

Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 3 и оканчивающихся на 1. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести одно число: количество чисел, кратных 3 и оканчивающихся на 1.

👇
Открыть все ответы
Ответ:
апрркн1
апрркн1
15.05.2020

var

a:array[1..10,1..10] of integer;

b:array[1..10,1..10] of integer;

sum:array[1..10,1..10] of integer;

pol,otr,max,min:real;

i,j,indexi,indexj:integer;

begin

min:=0;

 max:=0;

randomize;

for j:=1 to 10 do

begin

 for i:=1 to 10 do

begin

randomize;

 

 a[i,j]:=random(51);

randomize;

 

 b[i,j]:=random(51);

 a[i,j]:=a[i,j]*2;

writeln(a[i,j]);

a[i,j]:=a[i,j]/2;

end;

end;

for j:=1 to 10 do

begin

for i:=1 to 10 do

begin

a[i,j]:=a[i,j]+b[i,j];

writeln(a[i,j]);

a[i,j]:=a[i,j]-b[i,j];

end;

end;

for j:=1 to 10 do

begin

for i:=1 to 10 do

begin

if a[i,j]<min then

begin

 

 min:=a[i,j];

 indexi:=i;

 indexj:=j;

 end;

end;

end;

writeln(min,indexi,indexj);

for j:=1 to 10 do

begin

 

 for i:=1 to 10 do

 begin

if (a[i,j]>0) and (a[i,j]>max) then

max:=a[i,j];

end;

end;

writeln(max);

max:=0;

for j:=1 to 10 do

begin 

for i:=1 to 10 do

begin

 

if (a[i,j]<0) and (a[i,j]>max) then max:=a[i,j];

end;

end;

writeln(max);

end.

 

 программа выполняет сразу все 7 пунктов. Значения задаются сами. На выходе с каждой строки Вы получите каждый пункт задания.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

4,7(45 оценок)
Ответ:
diana5974767
diana5974767
15.05.2020

Выигрывает 2 игрок. Для доказательства стоит рассмотреть дерево игры.

на доске записано 2.

первый игрок делает любой ход и на доске может появится одно из чисел 5, 7 или 4.

потом  ходит второй игрок. И на доске может появится одно из следующих чисел: 8, 9, 10, 12, 14. Естественно, если каждый игрок играет на выигрыш, то числа 12 и 14 он писать не будет. Тогда наступает ход первого игрока, при котором на доске может появится 11, 13, 16, 15, 20, 18. Таким образом видим, что при любом ходе первого игрока, второй все равно выиграет.

                                                                |     2     |

1 игрок                       | 5 |                            | 7  |                            |4|

2 игрок          | 8          10        10|       |10        12         14 |       | 8      8       9|

1 игрок     |11  13  16|      |  13   15    20|          выигрыш 1    |11    13   16|   |12   14    18|

 

надеюсь, что стало понятно :)

4,5(76 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ