Задать вопрос
7 июля, 04:25

Дана программа на языке программирования Паскаль. Запиши данную программу и запусти.

uses crt;

var

mas, A: array[1 ... 10] of real;

begin

clrscr;

mas[1]:=10;

mas[5]:=27;

mas[9]:=88;

A[1]: = (mas[9]-mas[1]) * mas[5];

write (A[1]:5:0) ;

readkey;

end.

+4
Ответы (2)
  1. 7 июля, 05:04
    +1
    На экран выводится число 2106.
  2. 7 июля, 06:24
    0
    Видимо, нужно показать что выведется на экран при выполнении

    A[1] = (88-10) * 27=2106

    A[1]:5:0 - эта запись показывает, что для вывода на экран этого числа будет выделена память под 5 цифр после запятой, а на экран выведется 0

    таким образом на экран выведется 2106
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin clrscr; mas[1]:=11; mas[5]:=33; mas[9]:=92; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]:5:0) ; readkey; end.
Ответы (1)
Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin clrscr; mas[1]:=11; mas[5]:=27; mas[9]:=89; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]:5:0) ; readkey; end.
Ответы (1)
Ана программа на языке программирования Паскаль. Запиши данную программу и запусти. uses crt; var mas, A: array[1 ... 10] of real; begin clrscr; mas[1]:=14; mas[5]:=29; mas[9]:=80; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]:5:0) ; readkey; end.
Ответы (1)
Определите и запишите, что будет выдавать программа по завершению. uses crt; var mas, A: array[1 ... 10] of integer; begin clrscr; mas[1]:=10; mas[5]:=25; mas[9]:=16; A[1]: = (mas[9]-mas[1]) * mas[5]; write (A[1]) ; readkey; end.
Ответы (1)
Var s, i:integer; Mas: array[1 ... 10] of integer; begin Mas[1]:=14; Mas[2]:=10; Mas[3]:=-8; Mas[4]:=6; Mas[5]:=12; Mas[6]:=4; Mas[7]:=-16; Mas[8]:=-7; Mas[9]:=5; Mas[10]:=3; s:=0; for i:=1 to 5 do Mas[2*i]:=-Mas[2*i-1];
Ответы (1)