Срочно с2 ибо на кр сижу
10-11 класс
|
const n=3;
var
i,x,c:integer;
a:array [1..100] of integer;
begin
writeln('Vvedite massiv');
for i:=1 to n do
Readln(a[i]);
writeln('Vvedite x');
Readln(x);
Writeln('Nomer elementa:');
for i:=1 to n do
if a[i]=x then begin c:=1; writeln(i); end;
if c=0 then Writeln('net takogo elementa');
end.
Другие вопросы из категории
Б) Передать по каналу связи без использования архиватора. Какой способ быстрее и насколько, если – средняя скорость передачи данных по каналу связи составляет 218 бит в секунду, – объем сжатого архиватором документа равен 30% от исходного
принтер; а) линия связи обозначает отношение «передает информацию»; б) линия связи обозначает «управляет».
Удалите с дискеты 2-й и 4-й файлы.
Запустите программу дефрагментации
Пуск – Программы – Стандартные – Служебные программы – Дефрагментация диска.
Выберите в качестве дефрагментируемого диска Диск А.
В окне «Программа дефрагментации диска» нажмите кнопку Дополнительно и установите в появившемся окне способ дефрагментации – полная дефрагментация, затем нажмите ОК и Запуск, даже если будет сказано, что диск не нуждается в дефрагментации.
Когда дефрагментация начнется, нажмите кнопку Сведения, а в появившемся окне кнопку Легенда.
Понаблюдайте за процессом дефрагментации. Не спешите выходить из программы, пока не рассмотрите все, что находится на экране.
Что в наблюдаемой вами картине можно считать ситуацией моделирования?
Что моделируется?
Чем
моделируется?
Цель моделирования.
Задание 2.
Читайте также
Если поможете я потом еще баллов заработаю кину, или денюжку на мобильный
Задан числовой массив а[2,5] .Найти кол-во массивов делящихся на 5
Определить делится ли на целое число х целое число у без остатка. Если делится, то разделить х на у и вывести его. В турбо паскале програмку написать.
хранения больше 3 и меньше 6 месяцев, то товар уценивается на 12 процентов. При сроке хранения больше 6 месяцев стоимость уменьшается на 50 процентов. Как можно решает указанную задачу? Учесть, что срок хранения для первого товара занесен в ячейку С2, а стоимость этого товара для уценки стоит в ячейке B2.