1) определите и выведите на экран количество чисел от 50 до 500, которые делятся на 11 и 13 одновременно. 2) дан массив целых чисел, состоящий из 100 элементов. заполнить его с клавиатуры. найти: а) удвоенную сумму положительных элементов; б)вывести индексы тех элементов, значения которых больше значения предыдцщего элемента ( начиная со второго)

1)

var i,k: integer; begin k: =0; for i: =50 to 500 do beginif (i mod 11=0)and(i mod 13=0) then k: =k+1; end; writeln(k); end.

// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! type   tt=record       x: integer;       y: real   end; procedure compare(f: file of tt; a: array of integer; var r: string); begin   r: ='true';   if f.filesize< > a.length then begin       writeln('размер массива не соответствует количеству записей файла');       r: ='false';       exit       end;   f.seek(0);   var t: tt;   for var i: =0 to a.length-1 do begin       read(f,t);       if t.x< > a[i] then begin           r: ='false';           exit           end       end end; begin   var f: file of tt;   var n: =readinteger('n=');   writeln('введите ',n,' значений для сравнения');   var a: =readarrinteger(n);   var good: ='';   assign(f,'f1.dat'); reset(f);   compare(f,a,good);   writeln(good);   f.close end. внимание! поскольку входной файл не был представлен, программа не тестировалась! проверена лишь компиляция программы.

Компьютерные программы программисты для решения разнообразных . программирование — важный, но не единственный этап решения на компьютере. чтобы решать на компьютере, необходимо владеть языком программирования, обладать знаниями в области информационного моделирования и алгоритмизации. этапы решения на компьютере на первом этапе обычно строится словесная информационная модель объекта или процесса. при этом должно быть чётко определено, что дано (какие исходные данные известны, какие данные допустимы) и что требуется найти в решаемой . также должны быть чётко выделены наиболее существенные свойства рассматриваемого объекта, указаны связи между исходными данными и результатами. на втором этапе описательная информационная модель формализуется, т.е. записывается с некоторого формального языка. для этого требуется: понять, к какому классу принадлежит рассматриваемая ; записать известные связи между исходными данными и результатами с соотношений; выбрать наиболее подходящий способ для решения . на третьем этапе осуществляется построение алгоритма чёткой инструкции, необходимую последовательность действий для решения . алгоритм чаще всего представляется в форме блок-схемы, в виду её наглядности и универсальности. на четвёртом этапе алгоритм записывается на одном из языков программирования. на пятом этапе осуществляется отладка и тестирование программы. этап отладки и тестирования также называют компьютерным экспериментом. отладка программы — это процесс проверки работоспособности программы и исправления обнаруженных при этом ошибок. ошибки могут быть связаны с нарушением правил записи программы на конкретном языке программирования. их программисту выявить используемая система программирования; она выдаёт на экран сообщения о выявленных ошибках.