Задача: Введение в Paskal. Линейные алгоритмы
Описание
Характеристики решённой задачи
Список файлов
Задача:
Обменять значения двух переменных, используя третью (буферную) переменную.
Описание переменных:
x - первая переменная;
y - вторая переменная;
b - буферная переменная (для хранения значения другой переменной).
Алгоритм решения задачи:
Обмен значений двух переменных протекает по следующему алгоритму:
В буферной переменной сохраняется значение первой переменной.
Первой переменной присваивается значение второй.
Второй переменной присваивается значение буферной переменной, это значение равно старому значению первой переменной.
Программа на языке Паскаль:
var x, y, b: integer;
begin
write ('Input first number: ');
readln (x);
write ('Input second number: ');
readln (y);
writeln ('x = ', x, ', y = ', y);
writeln ('Changing values... changing values...');
b := x;
x := y;
y := b;
writeln ('x = ', x, ', y = ', y);
readln
end.
Задача:
Получить от пользователя данные, обработать их и вывести на экран
Программа на языке Паскаль:
var
a,b,c,d,sum: integer;
mult: longint;
begin
write('Input number a: ');
readln(a);
write('Input number b: ');
readln(b);
sum:= a+b;
writeln('Sum of the numbers ',a,' and ',b,' is ',sum);
writeln;
writeln('Input below numbers c and d: ');
read(c,d);
mult:= c*d;
writeln('The result of multiplying ',c,' and ',d,' is ',mult);
end.
Задача:
Вывести на экран действительное число в различных форматах представления.
Программа на языке Паскаль:
var
a: real;
begin
write('Input real number: ');
readln(a);
writeln('Output without formatting: ',a);
writeln('Output in exponential form: ',a:12);
writeln('Output in exponential form: ',a:7);
writeln('Output in fixet-point: ',a:10:3);
writeln('Output in fixet-point: ',a:12:6);
end.