Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 4. Оператор присваивания
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
// Опишите все необходимые переменные в разделе описаний
// до строки begin.


begin
  read(a,b);
  radd := a + b;
  rmult := a * b;
  Print(radd,rmult);
end.
[2]
// Опишите все необходимые переменные в тексте основной программы,
// поставив слово var перед первым использованием переменной.

begin
  a := ReadReal;
  b := ReadReal;
  radd := a + b;
  rmult := a * b;
  Print(radd,rmult);
end.
[3]
// Исправьте названия функций на правильные.

begin
  var a := 2;
  var b := sgrt(a);
  Prnt(b);
  a := -3;
  b := ads(a);
  Prnt(b);
end.
[4]
// Допишите программу.
// Увеличивайте a на 1 и выводите чтобы получить последовательность
// 1 2 3 4 5 6 7 8 9

begin
  var a := 1;
  Print(a);
  a := a + 1;
  Print(a);

end.
[5]
// Допишите программу.
// Увеличивайте a на 2 чтобы вывести последовательность нечетных чисел
// 1 3 5 7 9 11 13 15 17 19

begin
  var a := 1;
  Print(a);
  a := a + 2;
  Print(a);

end.
[6]
// Допишите программу.
// Увеличивайте a в 2 раза и выводите чтобы получить последовательность
// 2 4 8 16 32 64 128 256 512 1024

begin
  var a := 2;
  Print(a);
  a := a * 2;
  Print(a);

end.
[7]
// Поменяйте местами значения переменных b и c между вызовами Println.
// Используйте вспомогательную переменную v.

begin
  var a := 2;
  var b := 5;
  var c := 3;
  Println(a,b,c);



  Println(a,b,c);
end.
[8]
// Между вызовами Print
// поменяйте местами значения переменных a и b,
// затем значения переменных c и d,
// дважды используя стандартную процедуру Swap.

begin
  var a := 3;
  var b := 1;
  var c := 7;
  var d := 5;
  Println(a,b,c,d);



  Println(a,b,c,d);
end.