Презентация на тему Обменять значения двух переменных, используя третью (буферную) переменную

Содержание

2. var x, y, b: integer; begin
3. Пример 1: переведите на язык программирования.
4. Задание 1: переведите на язык программирования.
5. ПРИМЕР 2. Пешеход шел по пересеченной местности.
6. Задание 2. Дневной заработок продавца арбузов (DZ)
7. Скачать презентацию
8. Похожие презентации

var x, y, b: integer; begin write (‘введите первое число: '); readln (x); write (' введите второе число: '); readln (y); writeln ('x = ', x, ', y = ', y);

Главная
Информатика
Обменять значения двух переменных, используя третью (буферную) переменную

Обменять значения двух переменных, используя третью (буферную) переменную. Описание переменных: x -

var x, y, b: integer; begin write (‘введите первое число: ');

Пример 1: переведите на язык программирования.

Задание 1: переведите на язык программирования.

ПРИМЕР 2. Пешеход шел по пересеченной местности. Его скорость движения по равнине

Задание 2. Дневной заработок продавца арбузов (DZ) руб., один продавец торгует в

Написать программы для решения следующих задач (по действиям расписать):1. Вычислить периметр и

Слайды презентации

Слайд 2 var x, y, b: integer;

begin write (‘введите

первое число: '); readln (x); write (' введите второе

число: '); readln (y); writeln ('x = ', x, ', y = ', y); writeln ('Changing values... changing values...'); b := x; x := y; y := b; writeln ('x = ', x, ', y = ', y); end.

Слайд 3 Пример 1: переведите на язык программирования.

Слайд 4
Задание 1: переведите на язык программирования.

Слайд 5 ПРИМЕР 2. Пешеход шел по пересеченной местности. Его

ПРИМЕР 2. Пешеход шел по пересеченной местности. Его скорость движения по

скорость движения по равнине v1 км/ч, в гору —

v2 км/ч и под гору — v3 км/ч. Время движения соответственно t1, t2 и t3 ч. Какой путь прошел пешеход?

Алгоритм решения задачи:
1. Ввести v1, v2, v3, t1, t2, t3.
2. S1 := v1 * t1.
3. S2 := v2 * t2.
4. S3 := v3 * t3.
5. S := S1 + S2 + S3.
6. Вывести значение S.
7. Конец.

Программа: var v1, v2, v3, t1, t2, t3: integer; S1,S2,S3,S :real;
Begine
readLn (v1, v2, v3, t1, t2, t3);
S1 := v1 * t1;
S2 := v2 * t2;
S3 := v3 * t3;
S := S1 + S2 + S3;
writeLn (S);
end.