1.Описать следующие переменные по образцу: var i:integer;
1) x1, x2- целочисленные;
2) y1, y2- вещественные;
3) a- строковую;
4) b- логическую;
5) c- символьную.
2. Записать операторы ввода вывода по заданиям:
1) Ввести переменные x1, x2 без перехода курсора на новую строку;
2) Вывести текст "школа №16" с переходом курсора на новую строку;
3) Ввести переменную а с переходом курсора на новую строку;
4) Вывести значение переменной b с пояснением без перехода курсора на новую строку.
3.Записать условный оператор на Паскале;
1)Если x>0, то вывести «положительное» иначе если x<0, то вывести «отрицательное» иначе вывести «=0»;
2)Если а>=10 и a<=99, то вывести «двузначное».
4.Записать цикл на языке Паскаль;
1)Пока а>0 делать а присвоить а-5;
2)Повторять x присвоить x+2 до тех пор, пока x>20;
3)для y от 5 до 10 делать s присвоить s+3.
Заранее
1) var: x1, x2:integer;
y1,y2:real;
a:string;
b:boolean;
c:char;
2) read(x1,x2);
writeln("школа №16");
readln(a);
write(b);
3) 1)
if (x>0) then
writeln("положительное")
else if (x<0) then
writeln("отрицательное")
else
writeln("=0);
3) 2)
if (a >= 10 and a <= 99) then
writeln("двузначное");
4) 1)while (a>0) do
a := a - 5;
4) 2)repeat
x := x + 2;
until x > 20
4) 3) for y:=5 to 10 do
s := s + 3