выполнить тест по информатике 1. Перед вами слова, которые встречаются во многих программах. Как они переводятся на русский язык?a. else – b. do – c. var – 2. Запишите функцию для получения случайного числа x из промежутка: [-15; 15 a. random (16)b. random (30)-15c. random (5)+103. Квадратный корень из х в Паскале можно получить с функции:a. sqrt(x)b. frac(x)c. sqr(x)d. int(x)4. Характерным признаком линейной программы является …a. Наличие в каждой программе только одного оператораb. Использование в ней исключительно операторов присваиванияc. Выполнение операторов в порядке их записиd. Присутствие в ней оператора условного и безусловного перехода5. Выражение на языке Паскаль выглядит так: abs(sqr(z)-5*z+7). Как выглядит данное выражение на математическом языке?6. Программист торопился и ошибся в записи оператора присваивания на языке Паскаль: c:= 4x+15. Какая ошибка допущена?a. Нет верного ответаb. Пропущен знак умножения между 4 и xc. Числа записаны без скобокd. Выражение записано без скобок
Ответы
uses crt; const n:Integer; var a:array[1..20] of integer; // 20 это предустановлена в условии граниа не указанно можно 99 поставить i,j,k:integer; begin randomize; // это для генерации случайных чмсел у тебя могут быть предусановлены for i:=1 to n do a[i]:=random(99); // ну собственно генерация чисел от 0 до 99( в блок схеме это не нужно) for i:=1 to n-1 do for j:=i+1 to n do if a[i]>a[j] then begin k:=a[i]; a[i]:=a[j]; a[j]:=k; end; end. немного линни не пямые )) но разобратся сможешь
Program Zilly;
uses crt;
const n=10;
var
a,b,c:real;
tup,pryam:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
tup:=0;
pryam:=0;
writeln('Введите стороны треугольника');
write('А = '); readln(a);
write('B = '); readln(b);
write('C = '); readln(c);
a:=a*a;
b:=b*b;
c:=c*c;
if a=b+c then pryam:=1;
if b=a+c then pryam:=1;
if c=a+b then pryam:=1;
if a>b+c then tup:=1;
if b>a+c then tup:=1;
if c>a+b then tup:=1;
if tup=1 then writeln('Треугольник тупоугольный')
else
if pryam=1 then writeln('Треугольник прямоугольный')
else writeln('Треугольник остроугольный');
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Нужно это работа в 10 классе, нужно решение
Автор: autofilters27
с Дифференцированный зачетом
Автор: slspam
Рисунки, карты, чертежи, диаграммы, схемы, графики представляют собой
Автор: smokestylemos
Построить таблицы. можно написать на листочке и в ответах скинуть скрин.
Автор: Shaubnatali
1-else- (действие если условия ложно)
do- (Один Единственный Оператор)
var- (Начало описания переменных)
Если на русский,то.
else-ещё.
do-делать
var-есть.
2-random (30)-15
3-sqrt(x) - квадратный корень числа x
4-наличие в каждой программной строке только одного операторов
5- | \sqrt{z} - 5z + 7 |
6-Пропущен знак умножения между 4 и x
Объяснение: