Предмет: Информатика,
автор: zohon16
1.Исправить ошибки в программе;
2.Что выведется на экран в результате выполнения программы?
War:a,b,c-integer.x:real;
Bigin
A=7,b=3,2,c:=a+b;
Writln(summa=,c);
C:=c/2;x:=a-c;
Writeln('x=',x,'kvadrat=',x*x);
and
karimPhoenix:
это паскаль и у тебя проблемы с грамматикой, или это не паскаль и я туплю?)))
Дан текст программы в таблице с ошибками
Надо исправить ошибки
ахах)))) ну ок) щас будет)))
ахах да!!
Ответы
Автор ответа:
32
1). var
a:integer;
b,c,x:real;
begin
a:=7;
b:=3.2;
c:=a+b;
writeln('summa=',c);
c:=c/2;
x:=a-c;
writeln('x=',x,'kvadrat=',x*x);
end.
2). Первое-выведется сумма цифр равная "C"
второе-выведется значение "х"=а минус полу сумма(1,9 это будет) а потом квадрат этого числа, т.е. 1,9*1,9=3,61.... вроде все)))
a:integer;
b,c,x:real;
begin
a:=7;
b:=3.2;
c:=a+b;
writeln('summa=',c);
c:=c/2;
x:=a-c;
writeln('x=',x,'kvadrat=',x*x);
end.
2). Первое-выведется сумма цифр равная "C"
второе-выведется значение "х"=а минус полу сумма(1,9 это будет) а потом квадрат этого числа, т.е. 1,9*1,9=3,61.... вроде все)))
Спасибо большое!!!
всегда пожалуйста)))
Похожие вопросы
Предмет: Русский язык,
автор: 002хз
Предмет: Українська мова,
автор: Linamamedova
Предмет: Русский язык,
автор: imanbekova
Предмет: Английский язык,
автор: 7086
Предмет: Математика,
автор: ponka2205