nsh25044
?>

Фрагмент программы на паскале, выполненный для значений элементов массива а равных, соответственно, а[1]= 9; а[2]= 4; а[3]= 7; а[4]= 10; а[5]= 2; а[6]= 11 m : = a[1]; for i: = 2 to 5 do if a[i] > m then m : = a[i]; writeln ( m ); выведет число ……………………….

Информатика

Ответы

Ruslan Zarekovkin
Код ищет максимум среди первых пяти элементов массива, соответственно выведет 10
Maksimova1320
Пусть а - число правильных ответов, с - число неправильных ответов. тогда число вопросов, на которые ответы даны не были - 25-а-с 5*а-9*с=40 с у нас больше либо равно 1, тогда делаем методом подстановки, не забывая, что а - обязательно целое число. с=1 5а-9=40, 5а=49, а - число не целое, значит, не подходит. с=2 5а-18=40, 5а=58, а - число не целое, значит, не подходит. с=3 5а-27=40, 5а=67, а - число не целое, значит, не подходит. с=4 5а-36=40, 5а=76, а - число не целое, значит, не подходит. с=5 5а-45=40, 5а=85, откуда а =17. ответ: 17.
Igorevich_Aleksandrovna1599

Проверенные ответы содержат информацию, которая заслуживает доверия. На «Знаниях» вы найдёте миллионы решений, отмеченных самими пользователями как лучшие, но только проверка ответа нашими экспертами даёт гарантию его правильности.

{Задача сделана на языке паскаль, при Оформление сделана как для студенческой задачи

Если есть во пиши в личку

Задача:Написать программу на языке программирования Pascal, которая вводит с клавиатуры 4 числа и выводит результат вычисления спо следующей схеме: "число1"−"число2"/"число3"+"число4"

Автор:

Дата:  }

 var  x1, x2, x3, x4: integer;

f:real;

begin

//Ввод

writeln('введите 1 число');

readln(x1);  

writeln('введите 2 число');

readln(x2);  

writeln('введите 3 число');

readln(x3);  

writeln('введите 4 число');

readln(x4); //решение

f:=(x1-x2)/(x3+x4);  

//вывод

writeln (f);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Фрагмент программы на паскале, выполненный для значений элементов массива а равных, соответственно, а[1]= 9; а[2]= 4; а[3]= 7; а[4]= 10; а[5]= 2; а[6]= 11 m : = a[1]; for i: = 2 to 5 do if a[i] > m then m : = a[i]; writeln ( m ); выведет число ……………………….
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

shuxratmaxmedov
Irina_Chernyaev532
Сергеевич1386
Vs1377
Vkois56
РобертИрина
moto-eskort
kot271104
Viktoriya
stailwomen31
mberberoglu17
Nikolaevich1534
musaevartur
sodrugestvo48
Anna_Kamil