Циклически переставить значения переменных - Pascal

  1. Даны переменные A,B,C. Изменить их значения, переместив их содержимое A в B, B - в C, C - в A, и вывести новые значения переменных A,B,C.

textual

Код:

  program fff;
   uses crt;
   var
  g,v,a,b,c:integer;
 begin 
  clrscr;
  read(a);
  read(b);
  read(c);
  v:=b;
  b:=a;
  g:=c;
  c:=v;
  a:=g;
  write(a,b,c);
 end.

Похожие ответы
  1. Если в строке,размещенной в динамической памяти,нет символа +,то оставить текст без изменения, иначе каждую из цифр, предшествующую первому вхождению символа + заменить символом -.помогите сделать на PASCAL

  1. Добрый день уважаемые ппрограммисты. Хотелось бы спросить как написать программу, где присутствует mas и после нажатия ctrl+F9 появилось вот это:12344321- гед mas=8. Я ученик 8 класса и поэтому прошу написать программу по простому, прошли : For, if, repeat,until,while,else,совсем немного затронули case of, но думаю его в этой программе не будет. Заранее спасибо!

  1. r ,по идее , должно быть равно 1000000, но почему то получается 16960 !!! если написать так: r:=100*100*100 то всё нормально В чём прикол???

  1. Дано натуральное число. а) Получить все его делители. б) Найти сумму его делителей. в) Найти сумму его четных делителей. г) Определить количество его делителей. д) Определить количество его нечетных делителей. е) Определить количество его делителей. Сколько из них четных? ж) Найти количество его делителей, больших D.

  1. Пусть задана вещественная матрица А(n x n). Упорядочить элементы матрицы по не убыванию значений максимальных элементов в строках.Добавлено через 1 час 6 минут решите срочно нужно)Добавлено через 20 часов 21 минуту ,,

  1. Здравствуйте,можете подсказать,что не верно в задаче : у из интервала от A до B найти все простые.Определение простоты числа оформить в виде функции. я сделала но не полностью, надо чтоб 2 и 3 тоже писались

  1. 2. Найти сумму элементов в тех столбцах, которые содержат хотя бы один отрицательный элемент (оформить в виде функции).Помогите пожалуйста с решением этих задач! Это мои лабораторные задачки! Они решат, какую оценку я получу на рубежном контроле...заранее всех благодарю!

  1. Требуется проверить программу, через раз выдаёт правильный результат. Дан двумерный массив a, раз¬мером (nm). Найти номер ми¬ни¬мального элемента в каждой строке матрицы. Затем каждый элемент каждой строки разде¬лить на номер минимального элемента строки.

  1. Сформировать файл из значений случайных величин. Определить для данной последовательности сумму компонентов, значения которых больше 0,4.


Нашли ошибку?
Развитие проекта
Яндекс.Метрика