Ответы
Ответ дал:
0
program b;
var
bal:integer;
stip:real;
begin
write('Введите средний балл учащегося: ');
write('Введите стандартную стипендию: ');
readln(bal,stip);
if bal>=4 then stip:=stip+(stip/2) else
stip:=stip;
writeln('Стипендия учащегося: ',stip);
readln;
end.
Как я понял по условию, нужно посчитать стипендию у различных учеников...
var
bal:integer;
stip:real;
begin
write('Введите средний балл учащегося: ');
write('Введите стандартную стипендию: ');
readln(bal,stip);
if bal>=4 then stip:=stip+(stip/2) else
stip:=stip;
writeln('Стипендия учащегося: ',stip);
readln;
end.
Как я понял по условию, нужно посчитать стипендию у различных учеников...
Ответ дал:
0
да щас разбераться будем огромное спасибо
Ответ дал:
0
Если средний балл нужно вычислить в самой программе, а не ввести с клавиатуры, то программа немного отличаться будет. Там не очень сложно, вы справитесь.
Вас заинтересует
7 лет назад
10 лет назад
10 лет назад
10 лет назад