Задача 4 Урок 14.1

Задача 4 Урок 14.1:

Напишите процедуру, которая получает на вход три целых числа и выводит на экран их сумму.

program u141z4;
procedure sum();
var a,b,c: integer;
begin
  writeln('Vvedite 3 chisla');
  readln(a);
  readln(b);
  readln(c);
  writeln(a+b+c);
end;

begin
  sum();
  readln();
end.     

Задача 3 Урок 14.1

Задача 3 Урок 14.1:

У вас есть код:

var b: integer;
 
procedure pishi();
var a: integer;
begin
  a:=4;
  writeln(a);
  b:=2;
  writeln(b);
end;
 
begin  // тело программы
  b:=3;
  pishi();
  writeln(b);
end. 

-- эта программа в конечном итоге присваивает и выводит на экран 3 значения.

Задача 2 Урок 14.1

Задача 2 Урок 14.1:

Напишите процедуру, которая получает на вход два целых числа и выводит на экран то, которое больше.

program u141z2;
procedure summa();
var a,b: integer;
begin
  writeln('Vvedite 2 chisla');
  readln(a);
  readln(b);
  if (a>b) then
    writeln(a)
  else
    writeln(b);
end;
begin
  summa();
  readln();
end.  

Задача 1 Урок 14.1

Задача 1 Урок 14.1:

Напишите процедуру, которая просит пользователя ввести три числа, и потом выводит их в обратном порядке

program u141z1;
procedure perevorot();
var a,b,c: integer;
begin
  writeln('Vvedite 3 chisla');
  readln(a,b,c);
  writeln(c,b,a);
end;
begin
  perevorot();
  readln();
end.  

Урок 15 Задача 12

Урок 15 Задача 12:

Пусть есть процедура, которая умеет сдвигать массив влево на 1 элемент, начиная с указанного символа (устанавливая последний элемент равным нулю):
type newArr = array [1..5] of integer;
  

Урок 15 Задача 11

Урок 15 Задача 11:

Напишите функцию, которая определяет являются ли значения переданного массива целых чисел уникальными относительно друг друга.
Протестируйте работу функции на массиве из 7 случайных элементов из диапазона от 1 до 15-ти.

Например для массива:

|1|5|4|5|6|7|8|

-- функция должна "сообщить", что он неуникальный

а для:

|1|15|4|5|6|7|8|

-- что уникальный.

Урок 15 Задача 10

Урок 15 Задача 10:

Заполните массив из 5 элементов случайными числами из любого диапазона.

Далее пользователь вводит в цикле значения от 1 до 5 -- удаляйте из массива очередной элемент с позиции очередного введенного пользователем числа, сдвигая оставшиеся элементы массива влево, заполняя то, что справа нулями. Распечатывайте промежуточной состояние массива, после каждого удаления.

Урок 15 Задача 9

Урок 15 Задача 9:

Заполнить массив из 9 элементов случайными числами, далее получить случайное число N из диапазона от 1 до 9 и затем "удалить" элемент с позиции N из массива, "сдвинув" значения влево и заполнив все что справа нулями.
Например:

|1|3|4|5|4|7|-8|-9|

Путь n=2, тогда после работы программы мы должны получить:

|1|4|5|4|7|-8|-9|0|

Примечание: операции сдвига элементов массива оформите в виде подпрограммы.

git Создание репозитория в терминале, инициаллизация, Является ли папка репозиторием - как проверить

Как проверить, что директория уже является репозиторием

Перейдем в папку и запросим, например, историю изменений:

git status

Если выведется информация о состоянии репозитория (обычно указывается название ветки), например:

On branch master

No commits yet

phpstorm Не работает клик правой кнопкой мыши Автоматически выделяет текст при движении мыши

Наблюдаю в ubuntu 20

Что можно попровать:

  • отключить тачпад на ноуте,
  • перезагрузиться (предварительно провел обновление шторма и добавил минорные обновления ОС)

-- но ошибка подобная была и раньше, хотя и редко. Возм. тут просто перезагрузка решает и так до следующего раза

Pages

Subscribe to fkn+antitotal RSS