ПОМОГИТЕ НАПИСАТЬ Программку ДАЮ 35 БАЛЛОВ(только если
ПОМОГИТЕ НАПИСАТЬ Программку ДАЮ 35 БАЛЛОВ(только если правильно)!!!!11!!!1!!1!!1!!1111!!!!!1!1!1
В этом году при поступлении в институт абитуриентам требовалось удачно сдать экзамены по математике и физике. К раскаянью, с этим испытанием совладали не все. Знаменито, что на экзамены пришло N абитуриентов, из них M сдали арифметику, F сдали физику, а L не сдали ни 1-го предмета. Найдите, сколько абитуриентов сдали оба предмета и стали студентами, а также обусловьте, сколько абитуриентов сдали один экзамен: только по арифметике либо только по физике.
На экран выведите три числа через пробел:
a) количество абитуриентов, сдавших оба экзамена;
b) количество абитуриентов, сдавших только арифметику;
с) количество абитуриентов, сдавших только физику.
program raf105;
var n, m, f, o, mf, tm, tf: integer;
begin
write('Количество абитуриентов: ');
readln(n);
writeln(' Из их:');
write('Сдали арифметику: ');
readln(m);
write('Сдали физику: ');
readln(f);
write('Не сдали ни одного предмета: ');
readln(o);
mf:= (m+f)-(n-o);
tm:= m - mf;
tf:= f - mf;
writeln('Сдали оба экзамена: ',mf);
writeln('Сдали только математику: ',tm);
writeln('Сдали только физику: ',tf);
end.
PascalABC 3.4.2
-
Вопросы ответы
Статьи
Информатика
Статьи
Химия.
Русский язык.
Геометрия.
Физика.
Русский язык.
Химия.
Математика.
География.
Литература.
Разные вопросы.