Объясните что я неправильно сделал program калькулятор var a,b,c,d,e,f,g,h,i,j,k,l: integer; begin writeln ('введите число a: '); readln(a); writeln ('введите число b: '); readln(b); writeln(выберите,что вы хотите сделать с этими числами,1-сложение,2-вычитание,3-умножение,4-деление'); readln(q); if (q=1) then writeln('ваш результат',d); if (q=2) then writeln('ваш результат',f); if (q=3) then writeln('ваш результат',c); if (q=4) then writeln('ваш результат',e); c: =a+b; d: =a*b; e: =a/b; f: =a-b; end.
274
350
Ответы на вопрос:
Program калькуляторvara,b,c,d,e,f,g,h,i,j,k,l: integer; beginwriteln ('введите число a: '); readln(a); writeln ('введите число b: '); readln(b); writeln(выберите,что вы хотите сделать с этими числами,1-сложение,2-вычитание,3-умножение,4-деление'); readln(q); c: =a*b; d: =a+b; e: =a div b; (так будет программа выдавать целую часть от деления. например 7: 2 будет равно 3. если хочешь чтобы показывало 3,5 то тогда сделай real и поставь /) f: =a-b; if (q=1) thenwriteln('ваш результат',d); if (q=2) thenwriteln('ваш результат',f); if (q=3) thenwriteln('ваш результат',c); if (q=4) thenwriteln('ваш результат',e); end.
program калькулятор;
var
a,b,c,d,e,f,q: real;
begin
writeln ('введите число a: ');
readln(a);
writeln ('введите число b: ');
readln(b);
writeln('выберите,что вы хотите сделать с этими числами,1-сложение,2-вычитание,3-умножение,4-деление');
readln(q);
if (q=1) then begin
d: =a+b;
writeln('ваш результат: ',d);
end;
if (q=2) then begin
f: =a-b;
writeln('ваш результат: ',f);
end;
if (q=3) then begin
c: =a*b;
writeln('ваш результат: ',c);
end;
if (q=4) then begin
e: =a/b;
writeln('ваш результат: ',e);
end;
end.
Популярно: Информатика
-
ГораСлез09.12.2020 21:40
-
Дарчик105.10.2022 13:52
-
amdrik122131.03.2021 18:13
-
saltikov25.07.2022 11:28
-
ксюха28030.06.2021 01:56
-
ghi317.09.2021 10:18
-
Anotherdream27.09.2020 18:57
-
bulkin1218.02.2020 06:52
-
nikinouston34230.08.2021 13:26
-
karinanazarenkoAnna27.12.2021 14:08