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

Решить в паскале вывести на экран все натуральные числа от 15 до в. вводятся к произвольных чисел. вывести первый элемент, который больше 100. найти среднюю оценку за контрольную работу, если в классе 16 человек.

👇
Ответ:
№1
var i,b:integer;
begin
readln(b);
for i:=15 to b do
write(i,' ');
end.

№2.
var k,q,i,a:integer;
begin
readln(k);
q:=0;
for i:=1 to k do begin
readln(a);
if (a>100)and(q=0) then
q:=a; 
end;
writeln(q);
end.

№3.
var a,s,i:integer;
begin
s:=0;
for i:=1 to 16 do
begin
readln(a);
s:=a+s;
end;
writeln(s/16:3:2);
end.
4,4(9 оценок)
Открыть все ответы
Ответ:
DikONd
DikONd
05.12.2021
var 
a, b: integer;

begin 
write('Введите a: ');   
readln(a);   
write('Введите b: '); 
readln(b); 
var x := Range(a, b); 
writeln('Последовательность: '); 
x.Println; 
writeln('Ср. ариф. неотриц чисел: '); 
writeln(x.Where(x -> x >= 0).Average);
end.


var  a, b,i,s: integer;  k: real;

begin  
write('Введите a: ');    
readln(a);    
write('Введите b: ');  
readln(b); 
writeln('Последовательность: ');  
for i:=a to b do  write(i,' ');
writeln();
s:=0;
for i:=a to b do    
if i>=0 then begin   
s:=s+i;   
k:=k+1;
end;
writeln('Ср. ариф. неотриц чисел: '); 
write(s/k);
end.
4,5(50 оценок)
Ответ:
ktvsl
ktvsl
05.12.2021

1 - True/False

2 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания ложны.

3 - Конъюнкция

4 - X И Y И Z

5 - OR

6 - 1. Инверсия;

2. Конъюнкция;

3. Дизъюнкция;

4. Импликация;

5. Эквивалентность.

7 - логическая операция, которая преобразует исходное высказывание в новое, значение которого противоположно исходному.

8 - Импликация

9 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания истинны

10 -  Конъюнкция

11 - ?

12 - ?

Объяснение:

4,6(19 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ