?>
Визначте, в яких операторах допущені помилки. Виберіть кілька з 4 варіантів відповіді: 1) Label1.Captіon := Бажаю успіху!; 2) Label1.Color := clYellow; 3) Button1.Width := true; 4) Button1.Top := 40; Завдання #8 Запитання: Установіть відповідність між фрагментами програмного коду і типами помилок, які в них допущені Вкажіть відповідність для всіх 3 варіантів відповіді: 1) Синтаксична помилка 2) Помилка виконання 3) Немає помилки __ a = 6; b := 8; X := a/b; __ a := 6; b := 0; X := a/b; __ a := 16; b := 2; X:= a/b; Завдання #9 Запитання: Розташуйте дії в порядку виконання програми в покроковому режимі. Вкажіть порядок слідування всіх 3 варіантів відповіді: __ Натиснути сполучення клавіш Ctrl+F2 __ Натискати клавішу F7 після виконання кожного рядка операторів __ Натиснути клавішу F7
Ответы
// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!
var
a,b,c,R,dA,dB,dC:real;
begin
Writeln('Введите углы A,B в градусах и радиус R');
Read(dA,dB,R);
dC:=180-dA-dB;
a:=2*R*sin(dA*Pi/180);
b:=2*R*sin(dB*Pi/180);
c:=2*R*sin(dC*Pi/180);
Writeln('Угол C: ',dC:0:2);
Writeln('a=',a:0:5);
Writeln('b=',b:0:5);
Writeln('c=',c:0:5)
end.
Пример
Введите углы A,B в градусах и радиус R
30 70 50.0
Угол C: 80.00
a=50.00000
b=93.96926
c=98.48078