Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

Задача по паскалю. У ведіть два числа.Менше замініть сумою цих чисел, більше - їх різницею. Видіть результати.

10-11 класс

Dmitrievme29 05 июня 2013 г., 21:15:04 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Romeo656
05 июня 2013 г., 22:22:24 (10 лет назад)

var a,b,x,y: integer;

begin

writeln('vvedite 2 chisla');

readln(a,b);

if a-b>0 then

begin

x:=a-b;

y:=a+b;

end

else

begin

x:=a+b;

y:=b-a;

end;

write('a = ',x,', b = ',y);

readln;

end.

Ответить

Другие вопросы из категории

Помогите решить задачи в С#.

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

Помогите, пожалуйста! От этих задач зависит моя полугодовая оценка.

13. Соотнесите сетевые устройства и термины с их определениями. 1) MAC-адрес А) устройство, позволяющее компьютеру взаимодействовать с другими

устройствами сети-‘это что? 2) IP-адрес B) специализированный сетевой компьютер, пересылающий пакеты данных между различными сегментами сети 3) сетевой адаптер C) уникальный идентификатор, сопоставляемый с различными типами оборудования для компьютерных сет

Читайте также

Автомат получает на вход пятизначное десятичное число. По полученному числу строится новое десятичное число по следующим правилам.1.Вычисляются два числа

- сумма первых трёх цифр и сумма последних трёх цифр.2.Полученные два числа записываются друг за другом в порядке не убывания (без разделителей).Пример.Исходное число:15177.Поразрядные суммы: 7 ,15.Результат: 715.Определите, сколько из приведенных ниже чисел могут получиться в результате работы автомата.2626 2618 2624 2628 2826 2426 1826 610.В ответ запишите только количество чисел ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!

Здравствуйте) помогите составить задачи по паскалю)

задачи на такую тему: Составление, ввод, трансляция и
исполнение программ, реализующих
циклические алгоритмы и типовые
операции с одномерными массивами

Помогите решить задачи по паскалю:

1. модифицируйте предыдущий пример, так чтобы программа определяла максимальный и минимальный элемент массива
2. Напишите программу, которая бы определяла среднее арифметическое значение элементов массива (вещественная величина типа real)
Начало:
var a: array[1..10] of integer;
i: integer;
begin
а как дальше?

Предыдущий пример:
var a: array[1..10] of integer;
i: integer;
begin
randomize;
for i:=1 to 10 do
begina[i]:=random(40)-20;
end;
for i:=1write(a[i]:4);
end.



Вы находитесь на странице вопроса "Задача по паскалю. У ведіть два числа.Менше замініть сумою цих чисел, більше - їх різницею. Видіть результати.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.