За какво е следната програма

Публикувано на 11 ноември, вторник от Данаил

Опишете с едноредов коментар какво се случва на всеки ред от програмата. Напишете за какво служи тя:

Програма 1:

program project1;
var
  a, b, c: integer;
begin
  Write('Vavedete dve chisla:');
  ReadLn(a, b);
  c:= a;
  a:= b;
  b:= c;
  WriteLn('Chislata sega sa ', a, ' i ', b);
  ReadLn;
end.

Програма 2:

program project1;
var
  a, b: integer;
begin
  Write('Vavedete dve chisla: ');
  ReadLn(a, b);
  a:= a + b;
  b:= a - b;
  a:= a - b;
  WriteLn('Chislata sega sa: ', a, ' ', b);
  ReadLn;
end.
Публикувано в 10а, 10б с етикети . Постоянна връзка.

8 Responses to За какво е следната програма

  1. slayer11 каза:
    18 ноември, вторник в 16:00 
    program project1; //Начало на програмата
var //Деклариране на променливи
  a, b, c: integer; //Променливите а, b, c са цели числа
begin //Начало на алгоритъма
  Write('Vavedete dve chisla:'); //Извежда на екрана за въвеждане на две числа
  ReadLn(a, b); //Прочита от клавиатурате 2-те числа и ги записава в променливи а и b
  c:= a; //c присвоява стойноста на а
  a:= b; // а присвоява стойноста на b
  b:= c; // b присвоява сройноста на c 
  WriteLn('Chislata sega sa ', a, ' i ', b); // Извежда числата а и b на екрана
  ReadLn; // За да не се затвори програмата преди да видим резултата
end. //Край на алгоритъма
    • slayer11 каза:
      18 ноември, вторник в 16:05 
      program project1; //Начало на програмата
var //Деклариране на променливи
  a, b: integer; //Променливите а, b са цели числа
begin // Начало на алгоритъма
  Write('Vavedete dve chisla: '); //Извежда на екрана за въвеждане на две числа
  ReadLn(a, b); //Прочита от клавиатурате 2-те числа и ги записава в променливи а и b
  a:= a + b; //а присвоява стойноста от сбора на промеливите a и  b
  b:= a - b; // b присвоява стойноста от изваждането на промеливите a и b
  a:= a - b;  // а присвоява стойноста от изваждането на промеливите a и b
  WriteLn('Chislata sega sa: ', a, ' ', b); // Извежда числата а и b на екрана
  ReadLn; / За да не се затвори програмата преди да видим резултата
end. //Край на алгоритъма
  2. krisi3005 каза:
    18 ноември, вторник в 16:28 
    program project1; //начало на програмата
var //декларираме променливите
a, b: integer; //променливите а и  b са цели числа
begin // начало на алгоритъма
Write(‘Vavedete dve chisla: ‘); //извеждане: на екрана се появява да въведем  две числа
ReadLn(a, b); //прочита  двете числа и ги записва в променливи а и b
a:= a + b; //а присвоява стойността от сбора на променливите a и b
b:= a – b; // b присвоява стойността от изваждането на променливите a и b
a:= a – b; // а присвоява стойността от изваждането на променливите a и b
WriteLn(‘Chislata sega sa: ‘, a, ‘ ‘, b); // на екрана се извеждат  числата а и b
ReadLn; //слагаме го за  да не се затвори програмата преди да видим резултата
end. //край
  3. krisi3005 каза:
    18 ноември, вторник в 16:44 
    program project1; // начало на програмата
var // деклариране на променливи
  a, b, c: integer;//променливите а и b и с са цели числа
begin//начало 
  Write('Vavedete dve chisla:');//извеждане: на екрана се появява да въведем две числа
  ReadLn(a, b);//прочита двете числа и ги записва в променливи а и b
  c:= a;//с присвоява стойността на а
  a:= b;// а  присвоява стойността на b
  b:= c;//b присвоява стойността на с
  WriteLn('Chislata sega sa ', a, ' i ', b);// на екрана се извеждат числата а, i и  b
  ReadLn;//слагаме го за да не се затвори програмата преди да видим резултата
end.//край
  4. krisi3005 каза:
    18 ноември, вторник в 16:45 
    program project1;//начало на програмата
var//декларираме променливите
  a, b, c: integer;//променливите а  b  и с са цели числа
begin// начало на алгоритъма
  Write('Vavedete dve chisla:');//извеждане: на екрана се появява да въведем две числа
  ReadLn(a, b);/прочита двете числа и ги записва в променливи а и b
  c:= a;
  a:= b;
  b:= c;
  WriteLn('Chislata sega sa ', a, ' i ', b);
  ReadLn;
end.
  5. maggieap каза:
    19 ноември, сряда в 17:52 
    program project1; // показва името на програмата
var // деклариране на променливи
a, b: integer; // променливите а и b са цели числа
begin // начало
Write(‘Vavedete dve chisla: ‘); // това е командата за извеждане.Трябва да въведем две числа и те ще се изведат на екрана.
ReadLn(a, b); // въвежда. Прочитат се стойностите на двете променливи
a:= a + b; // а присвоява стойността от сбора на променливите a и b
b:= a – b; // b присвоява стойността от изваждането на променливите a и b
a:= a – b; // а присвоява стойността от изваждането на променливите a и b
WriteLn(‘Chislata sega sa: ‘, a, ‘ ‘, b); // извеждат се числата на променливите а и b
ReadLn; // за да видим резултата от програмата
end. // край
  6. sunshine каза:
    19 ноември, сряда в 20:45

    Програма 1
    program project1; //именуваме програмата project1
    var //декларираме променливите
    a, b, c: integer; //декларираме променливите a,b,c и отбелязваме, че са цели числа
    begin //начало на програмата
    Write(‘Vavedete dve chisla:’); //извежда се на екрана “Въведете две числа“
    ReadLn(a, b); //въвеждаме от клавиатурата стойности за променливите a и b
    c:= a; //променливата c присвоява стойността на променливата a
    a:= b; //променливата a присвоява стойността на променливата b
    b:= c; //променливата a присвоява стойността на c
    WriteLn(‘Chislata sega sa ‘, a, ‘ i ‘, b); //извежда на екрана “Числата сега са“ и получените след присвояването стойности на променливите а и b
    ReadLn; //не чете останалото до края на реда
    end. //край на програмата

    Програма 2
    program project1; //начало на програмата, именувана project1
    var //декларираме променливите
    a, b: integer; // декларираме променливите a,b, които са цели числа
    begin //начало на програмата
    Write(‘Vavedete dve chisla: ‘); //извежда на екрана “Въведете две числа“
    ReadLn(a, b); //въвеждат се от клавиатурата стойностите на променливите a,b
    a:= a + b; //променливата а присвоява сборът на а и b
    b:= a – b; //b присвоява разликата на а и b
    a:= a – b; //а присвоява разликата на а и b
    WriteLn(‘Chislata sega sa: ‘, a, ‘ ‘, b); //извежда на нов ред “Числата сега са“ и стойностите на а и b след присвояването
    ReadLn; //не чете останалото до края на реда
    end. //край на програмата

Вашият коментар