прост1232
25.06.2022 16:43

Нужно написать программы на Паскале и блок - схему составить нужно Все 2 задания нужно сделать​


Нужно написать программы на Паскале и блок - схему составить нужно Все 2 задания нужно сделать​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
makeevaed
01.02.2020 19:23

1. Укажіть всі цілі від’ємні числа, що більші за -4,7 .

А) -3,-2,-1; В) -5, -4,-3, -2,-1;

Б) -4,-3,-2,-1,0; Г) -4,-3,-2,-1.

2. Сума двох чисел 25 і одне з них у 5 разів менше за інше. Яка із систем відповідає умові

задачі, якщо менше число позначили через х, а більше – через у?

А) В)

Б) Г)

3.При якому значенні т значення виразу 4-2т дорівнює 7?

А) -1,5; Б) -10; В) 1,5; Г) -5,5.

4. Розв’яжіть рівняння х2 +9х=0

А) 0; Б) -9; В) -9; 0; Г) 0; 9.

5.При якому значенні змінної х дріб не має змісту?

А) 2; Б) -2,4; В) -4; Г) -2.

6. Серед наведених систем укажіть таку, що не має розв’язків

А В)

Б) Г)

7. Чому дорівнює сума та добуток коренів квадратного рівняння х2- 8х +15 = 0;

8.Складіть квадратне рівняння, корені якого дорівнюють 2 - та 2 + .

9.Розв’яжіть систему рівнянь:

10. Розвяжіть рівняння: -у4 -5у2 +36 =0

ІІ рівень

ІІІ рівень

Объяснение:

0,0(0 оценок)
Ответ:
Тохо2004
17.01.2021 04:46
//задача 1program _sqrt;var ar:array[1..100] of integer;i:integer;Res:real;beginfor i:=1 to 100 do ar[i]:=i;for i:=1 to 100 do if ar[i] mod 2=0 then res:=res+ar[i];res:=sqrt(res);write(res);end.
//задача 2. 100 элементов слишком много для произведенияprogram _sqrt;var ar:array[1..10] of integer;i:integer;res:int64;beginres:=1;for i:=1 to 10 dobeginar[i]:=i;res:=res*sqr(ar[i]);end;write(res);end.
//задача 3program _sqrt;var ar:array[1..100] of integer;i:integer;res:int64;beginfor i:=1 to 100 dobeginar[i]:=i;if ar[i] mod 2=1 then res:=res+ar[i];end;write(res);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота