Дана программа: Program Primer; Var A,result : real; Begin Writeln('Введите значения переменной A'); Write('A='); Readln(A); Result := sqr((9+A)*10); Writeln ('sqr((9+A)*10)', result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если A=1.
Помогите пожалуйста! 1. Раньше применительно к этому устройству говори эвм. 2. Очень часто этому изобретению придают очертания человека. 3. Устройство для передачи и приема звука на расстоянии. 4. В переводе с английского на русский это устройство называется блокнот.
напишите эссе состоящее из 100-150 словмна тему казахстан многонациональная страна при написании эссе используйте цитаты из различных источников 1 Для первой цитаты создайте сноску 2 Для второй цитаты создайте ссылку 3 Для третеё цитаты создайте гиперссылку ДАЮ 80 БАЛОВ
На острове живут рыцари и лжецы, всего 2017 человек. Рыцари всегда говорят правду, а лжецы всегда врут. Все жители по очереди выступили с заявлениями. Первый сказал: “Все мы лжецы”. Все последующие сказали: “Все, кто говорили до меня, лжецы”. Сколько на острове рыцарей?
1.Найти номер столбца наименьшего элемента массива размером МхN, элементы которого задаются с клавиатуры. 2.Подсчитать произведение отрицательных элементов на побочной диагонали квадратной матрицы, элементы которой вводятся датчиком случайных чисел. (Паскаль,10 класс)
1 ) У масиві В [1..7] замініть всі від'ємні елементи останнім. 2) У масиві С [1..к] визначне суму елементів з проміжку [х1;х2] На русском 1) В массиве В [1..7] замените все отрицательные элементы последним. 2) В массиве С [1..к] найдите сумму элементов из промежутка [х1; х2]
13. Информационные ресурсы – это а) знания, подготовленные людьми для социального использования в обществе и зафиксированные на материальном носителе; б) новые технические средства; в) процесс, использующий совокупность средств и методов сбора, обработки и передачи данных.
Помогите, очень срочно Программист написал программу вычисления периметра и площади прямоугольника. При запуске программы была выдана ошибка. В какой строке допущена ошибка? Program name; var a,b,s,p:real; begin a:=8; b:=3; p:=(a+b)*2 s:=(a*b); write('P=',p,' S=',s) end.
Прошу, ребят.. В ПАСКАЛЕЕЕЕ Составьте программу, находящую из трех чисел X, Y, Z наибольшее. Сначала выбрать наибольшее число из двух – X, Y и присвоить полученное значение переменной С, затем выбрать наибольшее из чисел С и Z и присвоить полученное значение переменной C
папишите эссе, состоящее из 100-150 слов, на тему «Казахстан - многонациональная страна». При написании эссе используйте цитаты из различных источников. 1. Для первой цитаты создайте сноску. 2. Для второй цитаты создайте ссылку. 3. Для третьей цитаты создайте гиперссылку.