Вклассе n учащихся. определить самую высокую и самую низкую оценку, полученную учащимися за урок. вывести порядковые номера учащихся, получивших самую низкую оценку.
Ответы
program F;
var F, A, B, C, x: real;
begin
read (A, B, C);
if B>C then x:=(B+C)
else if B=C then x:=(sqr(B));
F:=(A*x*x*x);
end.
Примечание: строчка «read (A, B, C)» означает ввод с клавиатуры значений А, В, и С. Если это не нужно, то её можно убрать (в этом случае программу невозможно будет выполнить на компьютере, ведь он не будет знать, чему равны А, В и С и не сможет производить над ними действия).
Также если требуется вывести получившееся значение F на экран, перед строчкой «end» нужно добавить строчку («writeln (F)».
Блок-схема в приложенном фото.
#include <iostream>
using namespace std;
int main()
{
int i,n,n2=0,n3,digit;
cin >> n; //Вводим число. Может быть отрицательным.
n3 = abs(n); //Для удаления цифр нужно положительное число
i = 1; //Переменная для количества десятков.
while(n3>0) { //Условия для выполнения цикла
digit = n3 % 10; //Получаем последнюю цифру
n3 = n3 / 10; //Уменьшаем число
if(digit!=3 && digit!=6){ //Проверка цифры
n2 = n2 + digit * i; //Создаем число умножая на десятки
i = i * 10; //Добавляем десятки
}
}
cout << ((n<0)?-n2:n2); //Вывод результата с добавление знака
}
Объяснение:
Есть цикл While
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
SurName : Array [1..30] of String;
Mark : Array [1..30] of Real;
Cand : Array [1..30] of String;
NPupil, K : Integer;
BEGIN
Write('Сколько всего учеников ? ');
ReadLn(NPupil);
WriteLn('Введите фамилии и оценки учеников :');
For var i := 1 to NPupil do
begin
Write(i, '. Фамилия - ');
ReadLn(SurName[i]);
Write(' Оценка - ');
ReadLn(Mark[i]);
end; WriteLn;
K:=0;
For var i := 1 to NPupil do
If Mark[i]=2 then
begin
K:=K+1;
Cand[K] := SurName[i]
end;
If K=0 then WriteLn('В КЛАССЕ НЕТ ДВОЕЧНИКОВ.')
else
begin
WriteLn('ДВОЕЧНИКИ :');
For var i := 1 to K do WriteLn( i, '. ' , Cand[i]);
end;
END.