Nikolai710
?>

9 класс информатика, сравнение по модулю, массивы ​

Информатика

Ответы

pnatalia

1\\0\\3\\8\\36\\7\\34\\14\\7\\14\\5\\6

rezh2009766

a) (z >= -7) and (z <= 10);

б) (x mod 2 = 0);

в) (x <> 78);

г) (x mod 2 <> 0);

Ошибки в программе:

1) Переменная а объявлена как integer, т.е предназначена для хранения целочисленных значений. Но при этом в программе ей присваивают значение 4.13, которое не является целым числом.

Правильно будет объявить переменную а типа real;

2) После ключевого слова begin никогда не ставится точка с запятой;

3) Перед else не ставится точка с запятой;

4) После заключительного end требуется ставить точку.

Правильный вариант:

var

 a:real;

begin

 a:=4.13;

 if (a+1 > 7) then write('a = ', a*3) else

   write('a = ', a*6);

end.


Запишите на языке Паскаль следующие условия. Только условия! а) z ϵ [-7; 10]; б) x четное число; в)
xsmall1

Console.Write("Введите значения\nВершины А - x1 = ");

           double x1 = double.Parse(Console.ReadLine());

           Console.Write("y1 = ");

           double y1 = double.Parse(Console.ReadLine());

 

           Console.Write("Вершины B - x2 = ");

           double x2 = double.Parse(Console.ReadLine());

           Console.Write("y2 = ");

           double y2 = double.Parse(Console.ReadLine());

 

           Console.Write("Вершины C - x3 = ");

           double x3 = double.Parse(Console.ReadLine());

           Console.Write("y3 = ");

           double y3 = double.Parse(Console.ReadLine());

 

           double S, P;

 

           S = 0.5 * Math.Abs((x2 - x1) * (y3 - y1) - (x3 - x1) * (y2 - y1));

 

           Console.WriteLine("Площадь треугольника равна: " + S);

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

9 класс информатика, сравнение по модулю, массивы ​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

khar4550
геннадиевна2001
fygasika
gsktae7
Бочкарева Горохова1652
lavr74
oafanasiev41
pokrov777krest
nikdenly
bestform
Struev730
Faed_Arakcheeva
vypolga1347
alena
Lapushkina