Вопрос: информация, хранимая в книгах, на магнитных носителях, грампластинках называется выберите один из 5 вариантов ответа: 1) архивной 2) внутренней 3) полезной 4) внешней 5) оперативной
var a: array[1..MAX_SIZE] of integer; i, size: integer;
procedure delete_odd_elements(); var i, j: integer; begin i := 1; repeat if odd(a[i]) then begin dec(size); for j := i to size do a[j] := a[j + 1] end else inc(i); until i > size; end;
begin writeln('Исходный массив: '); size := MAX_SIZE; for i := 1 to size do begin a[i] := random(100); write(a[i] : 3); end; delete_odd_elements; writeln; writeln('Полученный массив: '); for i := 1 to size do write(a[i] : 3); end.
Using System; // Написать программу, выводящую на экран таблицу квадратов // четных чисел от 0 до 10 в убывающем порядке: 100, 81, 49... // Составь блок-схему алгоритма, и напиши программу которая // выводит на экране узор, состоящий из звездочек. Должно быть 20 строчек со звездочками так, чтобы в каждой последующей строке было на одну звездочку больше. Для вывода на экран строки, со- держащей N звездочек, используй команды // String repeatedString = new String('*', N); Console.Write (repeatedString); // Microsoft visual studio c#
private static void SquaresOfNumbersDesc() { Console.WriteLine(); for (var i = 10; i >= 0; i = i - 2) { Console.Write("{0} ", i * i); } Console.WriteLine(); }
private static void Stars(int n, int start_stars) { Console.WriteLine(); for (var i = 0; i < n; i++) { Console.WriteLine(new String('*', start_stars + i)); } Console.WriteLine(); } } }
