Напишите программу которая производит обмен значений переменных х и у если х больше у
Напишем программу которая производит обмен значений переменных х и у если х больше у.
Для этого нам понадобится ввести дополнительную переменную z, для хранения значения одной из переменных.
program 1;
var x, y, z: integer;
begin
writeln (‘Введите значения переменных x и y’);
readln (x, y);
if x > y then
begin
z: = x;
x: = y;
y: = z;
writeln (‘x = ‘, x);
writeln (‘y = ‘, y);
end;
end.
Проверим работу данной программы двумя способами:
1) Пусть x = 5; y = 4.
Тогда программа сравнив значения x и y (5 > 4), приступит к следующему шагу:
И выведет на экран: x = 4, y = 5.
2) Пусть x = 3; y = 4.
Тогда программа сравнив значения x и y (3 < 4), остановит свое дальнейшее вычисление.
Помогите пожалуйста : напишите программу, которая производит обмен значений переменных x и y, если x больше у?
Помогите пожалуйста : напишите программу, которая производит обмен значений переменных x и y, если x больше у.
Пример входных данных Пример выходных данных x> ; > ; 5 x = 5 y> ; > ; 6 y = 6.
Writeln(‘Введите значения x и y’) ;
Помогите пожалуйста?
Дано целое трехзначное число a.
Получить утроенное значение числа, состоящего из цифр числа a, записанных в неубывающем порядке.
Входные данные : Во входном потоке записано единственное целое трехзначное число a.
Выходные данные : В выходной поток вывести единственное целое число.
Пример входного файла (input.
Пример выходного файла (output.
Напишите программу которая производит обмен значений переменных х и у если х больше у?
Напишите программу которая производит обмен значений переменных х и у если х больше у.
Питон Напишите программу, выводящую все биты 8 — битного числа Входные данные Дано число A (0≤A≤255)?
Питон Напишите программу, выводящую все биты 8 — битного числа Входные данные Дано число A (0≤A≤255).
Выходные данные Выведите число A в битовой форме : 8 бит, старшие биты слева, младшие – справа.
Примеры входные данные 5 выходные данные 00000101.
Дано натуральное число?
Дано натуральное число.
Выведите его последнюю цифру.
Входные данные Вводится единственное число (гарантируется, что оно не превышает 10000).
Выходные данные Выведите ответ на задачу.
Примеры входные данные 249 выходные данные 9.
Напишите программу(НА ПИТОНЕ), которая переводит переданное её целое число (возможно, отрицательное) в двоичный код?
Напишите программу(НА ПИТОНЕ), которая переводит переданное её целое число (возможно, отрицательное) в двоичный код.
Программа должна вывести двоичное представление переданного её числа.
Примеры входные данные 5 выходные данные 101 входные данные — 14 выходные данные — 1110 (НА ПИТОНЕ!
Помогите пожалуйста срочно?
Помогите пожалуйста срочно!
Напишите на паскаль.
Известны длины сторон треугольника a b c .
Напишите программу вычисляющая площадь этого треугольника.
Пример входных данных a = 3 b = 4 c = 5 Пример выходных данных s = 6.
Дано трехзначное число?
Дано трехзначное число.
Напишите программу, которая определяет : есть ли среди цифр заданного целого трехзначного числа одинаковые.
Пример входных данных и выходных данных : 123 — Нет 121 — Да 222 — Да В программе использовать div и mod помогите пожалуйста.
Напишите программу, которая переводит переданное её целое число (возможно, отрицательное) в двоичный код?
Напишите программу, которая переводит переданное её целое число (возможно, отрицательное) в двоичный код.
Программа должна вывести двоичное представление переданного её числа.
Примеры входные данные 5 выходные данные 101 входные данные — 14 выходные данные — 1110.
Паскаль?
Известны длины сторон треугольника а, b, c.
Напишите программу, вычисляющую площадь этого треугольника.
Пример входных данных — (a = 3 ; b = 4 ; c = 5), Пример выходных данных — (S = 6.
ПОМОГИТЕ ПОЖАЛУЙСТА / ИВТ 9 КЛАСС ДЕЛФИ / ПАСКАЛЬ / 50 БАЛЛОВ Напишите программу, которая по данному натуральному числу n выводит все его простые натуральные делители с учетом кратности?
ПОМОГИТЕ ПОЖАЛУЙСТА / ИВТ 9 КЛАСС ДЕЛФИ / ПАСКАЛЬ / 50 БАЛЛОВ Напишите программу, которая по данному натуральному числу n выводит все его простые натуральные делители с учетом кратности.
Время работы программы должно быть пропорционально корню из n.
Входные данные Программа получает на вход одно число n< ; 2 ^ 31.
Выходные данные Программа должна вывести все простые натуральные делители числа n с учетом кратности в порядке неубывания.
Примеры входные данные 6 выходные данные 2 3.
На этой странице сайта размещен вопрос Помогите пожалуйста : напишите программу, которая производит обмен значений переменных x и y, если x больше у? из категории Информатика с правильным ответом на него. Уровень сложности вопроса соответствует знаниям учеников 5 — 9 классов. Здесь же находятся ответы по заданному поиску, которые вы найдете с помощью автоматической системы. Одновременно с ответом на ваш вопрос показаны другие, похожие варианты по заданной теме. На этой странице можно обсудить все варианты ответов с другими пользователями сайта и получить от них наиболее полную подсказку.
Обмен значений переменных x и y если x больше y
Напишите программу, которая производит обмен значений переменных x и y если x больше y. Задачу можно решить несколькими способами. Предлагаю два.
Простая задача, с помощью которой можно продемонстрировать использование условного оператора if.
Решение
Напомним, как нужно использовать этот оператор.
Мы вводим с клавиатуры числа в переменные x и y типа integer, затем в операторе if проверяем условие x>y: если оно истинно, то выполняется then-блок оператора. Если x больше y, то происходит обмен значений переменных и на экран выводятся новые значения x и y.
или с использованием дополнительной переменной z
Без использования дополнительной переменной.
Код:
program Obmen;
var x,y: integer;
begin
writeln(‘Введите значения x и y’);
readln(x,y);
if x>y then
begin
x:=x+y;
y:=x-y;
x:=x-y;
writeln(‘x=’,x);
writeln(‘y=’,y);
end;
end.
С использованием дополнительной переменной.
Код:
program Obmen2;
var x,y,z: integer;
begin
writeln(‘Введите значения x и y’);
readln(x,y);
if x>y then
begin
z:=x;
x:=y;
y:=z;
writeln(‘x=’,x);
writeln(‘y=’,y);
end;
end.
Помогите пожалуйста: напишите программу, которая производит обмен значений переменных x и y, если x больше у. Пример входных дан
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
Writeln(ArrRandom(10,1,99).Println.Where(x->x mod 2=0).Average)
end.
<u><em>Тестовое решение:</em></u>
96 42 79 85 16 22 50 62 54 40
47.75
<u>»Школьный подход» (видимо, короткому решению у нас не учат)</u>
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
const
n=10;
var
a:array[1..n] of integer;
i,k,s:integer;
begin
s:=0;
k:=0;
Randomize;
for i:=1 to n do begin
a[i]:=Random(99)+1;
Write(a[i],’ ‘);
if a[i] mod 2 = 0 then begin
s:=s+a[i];
Inc(k)
end
end;
Writeln;
Writeln(s/k)
end.
<u><em>Тестовое решение:</em></u>
22 22 58 41 54 80 71 65 47 99
47.2