Робототехника тарихы және болашағы робот алға жүреді және сыртқы жарықтандырудың жарықтығын анықтайды робот қызыл, жасыл және сарыдан басқа түстерді анықтайды робот алға жүреді және бағдаршамның түстерін анықтайды, басқа түстерді анықтаған кезде – қозғалысты тоқтатады
Var - список переменных переменные а,с присваивают тип integer, т.е. целые числа; b присваивает тип string, т.е строковый тип begin - начало программы readln - оператор ввода, окончание ln осуществляет переход на новую строку str(a,b) - т.е. преобразовать данные числа в строку переменная b так же присваивает тип строковый Val(b,a,c) где: b- строка, а-результат, с-позиция с которой произошла ошибка преобразования или 0 writeln(а) - оператор вывода, окончание ln осуществляет переход на новую строку end. - конец программы
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016 begin var n:=ReadInteger('Кол-во элементов:'); var a:=ArrRandomReal(n,-10,20); a.Println; Writeln('С округлением если |x|<1'); for var i:=0 to n-1 do if abs(a[i])<1 then a[i]:=Round(a[i]); a.Println end.
Мен істеп болам қаз соған келдім лаик қоиш маған қаз аиттам