М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

1.Найдите ошибки в программе и напишите верный вариант программы: program a7;

begin

var a,b c integer;

real(a,b);

c:=sqr a;

writeln(’выведите значения величин a и bʼ);

writeln((a+b+c):4);

end.
2.В окне вывода результатом выполнения команды

write (’сумма чисел 10+20=’) будет:

а) сумма чисел 10+20=30; б) сумма чисел =30;

в) сумма чисел 10+20=.

👇
Ответ:
koteika282
koteika282
16.08.2021

В программе a7 есть несколько ошибок. Вот исправленный вариант программы:

program a7;

var

a, b, c: integer; // нужно разделить объявление переменных запятыми

begin

readln(a,b); // заменим real(a,b) на readln(a,b), чтобы прочитать значения a и b

c:=sqr(a); // добавим пропущенную скобку после a, чтобы выполнить возведение в квадрат

writeln('выведите значения величин a и b');

writeln((a+b+c):4);

end.

ответ на второй вопрос: результатом выполнения команды write('сумма чисел 10+20=') будет вариант (в): сумма чисел 10+20=. Если вы хотите вывести результат сложения чисел 10 и 20, нужно дополнить команду write соответствующим значением, например, так: write('сумма чисел 10+20=', 10+20);. Тогда в окне вывода будет выведено "сумма чисел 10+20=30".

4,7(4 оценок)
Открыть все ответы
Ответ:
Кей121
Кей121
16.08.2021

условие – выражение логического типа.

Цикл может не выполняться ни разу, если значение логического выражения сразу же оказывается ложь.

Серия команд, находящихся между begin и end, выполняются до тех пор, пока условие истинно.

Для того чтобы цикл завершился, необходимо, чтобы последовательность инструкций между BEGIN и END изменяла значение переменных, входящих в условие.

Цикл с постусловием (иначе цикл до) имеет вид:

Объяснение:

условие – выражение логического типа.

Цикл может не выполняться ни разу, если значение логического выражения сразу же оказывается ложь.

Серия команд, находящихся между begin и end, выполняются до тех пор, пока условие истинно.

Для того чтобы цикл завершился, необходимо, чтобы последовательность инструкций между BEGIN и END изменяла значение переменных, входящих в условие.

Цикл с постусловием (иначе цикл до) имеет вид:

4,8(99 оценок)
Ответ:
typaya1911
typaya1911
16.08.2021
// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!

function Len(ax,ay,bx,by:real):=sqrt(sqr(bx-ax)+sqr(by-ay));

var
  x,y,L:array[1..4] of real;
begin
  Writeln('Введите координаты четырех точек (парами х,y)');
  for var i:=1 to 4 do Read(x[i],y[i]);
  for var i:=1 to 3 do
    L[i]:=Len(x[i],y[i],x[i+1],y[i+1]);
  L[4]:=Len(x[4],y[4],x[1],y[1]);
  var s:=0.0;
  for var i:=1 to 4 do s+=L[i];
  Writeln('P=',s)
end.

Пример
Введите координаты четырех точек (парами х,y)
-5 -4.7 -3.2 6.7 5.1 8 7.4 -6.13
P=46.7405707422041

Во вложениях приведено решение этой же задачи в онлайн-калькуляторе. ответ совпадает.

Информатика. паскаль. по заданным декартовым координатам вершин четырехугольника p1(x1,y1),p2(x2,y2)
Информатика. паскаль. по заданным декартовым координатам вершин четырехугольника p1(x1,y1),p2(x2,y2)
4,4(21 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ