Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Roman4815162342
0 / 0 / 0
Регистрация: 19.05.2013
Сообщений: 1
#1

Исправьте ошибки в программе и запишите что будет напечатано на экране - Turbo Pascal

22.05.2013, 16:19. Просмотров 1109. Ответов 2
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
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
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.05.2013, 16:19
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Исправьте ошибки в программе и запишите что будет напечатано на экране (Turbo Pascal):

Определить, что будет напечатано программой - Turbo Pascal
Помогите пожалуйста с решением задачи, заранее спасибо!!! Что будет напечатано программой: program aba; Var a,b: integer; ...

Объясните, что будет напечатано программой - Turbo Pascal
Объясните, что будет напечатано программой: program e1; var i: byte; a: array of integer; begin for i:=1 to 10 do...

Объясните, что будет напечатано программой - Turbo Pascal
объясните, что будет напечатано программой: program e2; var i: byte; b: array of integer; begin for i:=1 to 4 do for j:=1...

Определить, что будет напечатано в результате выполнения программы - Pascal
var s, k; integer; begin s:=40 for k:=1 to 7 do s:=s-3 write(s); end.

Что будет напечатано этой программой? Паскаль не робит( - Pascal
program time(input, output); var fi:real; h,m:integer; begin read(fi); h:=trunc(fi/30); m:=trunc(fi-30*h)/0.5); writeln(h, ' ',...

Что будет напечатано в результате выполнения данной программы? - Turbo Pascal
PASCAL PROGRAM PR2; VAR X, Y: INTEGER; BEGIN X:=5; Y:=1; X:=1 + X MOD Y; Y:=Y * (Y + 2); X:=5 + X DIV Y WRITELN(X); END.

2
Puporev
Модератор
54033 / 41666 / 14741
Регистрация: 18.05.2008
Сообщений: 97,972
22.05.2013, 16:39 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
var  a: integer;
     b,c,x: real;
Begin
A:=7;
b:=3.2;
c:=a+b;
Writeln('summa=',c:0:1);
C:=c/2;
x:=a-c;
Writeln('x=',x:0:1,' kvadrat=',x*x:0:1);
end.
0
Midian
220 / 220 / 60
Регистрация: 31.03.2013
Сообщений: 1,955
Завершенные тесты: 6
22.05.2013, 16:41 #3
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
var
a,b,c: real;
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.
Добавлено через 42 секунды
Не успел малеха
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.05.2013, 16:41
Привет! Вот еще темы с ответами:

Что будет напечатано в результате выполнения следующего фрагмента программы? - Pascal
Что будет напечатано в результате выполнения следующего фрагмента программы? x := 7.9; y := -5.123; If x > y Then m := x-5 Else if x=y...

Что будет напечатано в результате работы следующего фрагмента программы - Turbo Pascal
Здравствуйте! Помогите пожалуйста написать что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; ...

Что будет напечатано в результате выполнения следующего фрагмента программы? - Pascal
Что будет напечатано в результате выполнения следующего фрагмента программы? x := 5; y := 4; z := 8; If x > y Then max := x Else max :=...

Что будет напечатано в результате выполнения следующего фрагмента программы? - Turbo Pascal
1. Что будет напечатано в результате выполнения следующего фрагмента программы? x := 2; If x <= 0 Then f := 0 Else If x <= 1 Then f...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru