ПРОЙТИ ТЕСТ ПО ИНФОРМАТИКЕ. 8 КЛАСС LAZARUS
1.Програмний код містить оголошення Button1:TButton: Оберіть правильні твердження (несколько ответов)
a)Об"єкт має назву Button1
б)ТButton - це назва об"єкта
в)Клас ТButton належить об"єкту Button1
г)Об"єкт Button1 належить класу ТButton
2.Напишіть назву властивості, за до якої можна встановити напис на кнопці ? свой ответ
3.За до якого виразу можна в програмі отримати текс, що міститься в текстовому полі Edit1?
а)TEdit.Text
б)Edit1
в)Edit1.Caption
г)Edit1.Text
д)Text.Edit1
4.Який інструмент треба вибрати, щоб додати текстове поле? *
а)Label1
б)Edit1
в)Button
г)Caption
5.За до якої властивості можна додавати елементи списку? *
а)Items
б)Label1
в)Caption
г)ComboBox1
6.При додаванні другої форми до проєкта, які нові файли з"являються? Оберіть правильні твердження.(несколько ответов)
а)файл коду unit2.pas
б)файл форми unit2.lfm
в)файл проєкта unit2.lpr
г)файл піктограми unit2.ico
7.Щоб у програмному модулі Unit1 звернутись до інших форм, під словом implementation необхідно записати вказівку... *
а)user Unit1, Unit2;
б)usesion Unit1, Unit2;
б)uses Unit1, Unit2;
8.Яку дію виконує команда Form2.Show? *
a)Приховує Form1
б)Відображує Form2 і приховує Form1
в)Відображує Form2
9.Хто відображає дію, яку може виконати об"єкт?
а)Метод
б)Варіант
в)Команда
г)Проєкт
10.За до якої властивості можна додавати елементи списку (свой ответ)
переменные а,с присваивают тип integer, т.е. целые числа; b присваивает тип string, т.е строковый тип
begin - начало программы
readln - оператор ввода, окончание ln осуществляет переход на новую строку
str(a,b) - т.е. преобразовать данные числа в строку
переменная b так же присваивает тип строковый
Val(b,a,c) где: b- строка, а-результат, с-позиция с которой произошла ошибка преобразования или 0
writeln(а) - оператор вывода, окончание ln осуществляет переход на новую строку
end. - конец программы
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.
Тестовое решение:
Кол-во элементов: 10
-0.751956142835299 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -0.700975591643235 3.85500546258642 -1.94321916994789 19.3021338336645
С округлением если |x|<1
-1 5.95022566427953 3.58861613254464 7.42331713783709 -4.75036238075717 -9.41228387384316 -1 3.85500546258642 -1.94321916994789 19.3021338336645