Программа на pascal, в которой нужно заменить цикл while на for. const n=10;
var a: array [1..n] of integer; i, p: integer;
begin
writeln('Ввод значений элементов массива:');
for i:=1 to n do
read(a[i]);
write('Ввод p: ');
readln(p);
i:=1;
while (i<=n) and (a[i]<>p) do i:=i+1;
if i=n+1
then writeln('Искомого элемента в массиве нет')
else writeln('Искомый элемент a[', i, '] = ', a[i])
end.
187
392
Ответы на вопрос:
const n=10;
var a: array [1..n] of integer;
i, p: integer;
begin
writeln('Ввод значений элементов массива:');
for i:=1 to n do
read(a[i]);
write('Ввод p: ');
readln(p);
for i := 1 to n do
begin
if a[i] = p then
begin
writeln('Искомый элемент a[', i, '] = ', a[i]);
break;
end;
if (i = n) and (a[i] <> p) then
writeln('Искомого элемента в массиве нет');
end;
end.
#include < iostream> #include < math.h> using namespace std; int main() { int a, b; cin > > a > > b; int i; for (i = sqrt(a) + 1; i < sqrt(b); i++) { cout < < i * i < < " "; } return 0; }
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
АnnaaaaA09.12.2020 09:43
-
Anonim211822.01.2022 04:52
-
привет98021.02.2020 12:45
-
Маша2820116.07.2021 19:15
-
Aлинa1120.04.2021 10:31
-
раптраир01.07.2021 00:54
-
lunenko200513.02.2022 18:41
-
Princesska8806.04.2023 14:14
-
круто4531.07.2021 13:42
-
вованчик327.07.2021 01:09
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.