Какая задача решается по следующей программе?

Кристина2003567 20 дек. 2020 г., 09:37:10

По условию задачи A = 7 , B = 8 = >(A + B) = 15, (B - A) = 1

15 * 1 = 15 = C.

Valeriykot2016 8 мая 2020 г., 23:26:20 | 5 - 9 классы

Что делать?

Что делать?

Program n1 ; Type Test = class Private Var a : integer : = 10 ; Public Var b : integer : = 15 ; End ; Begin Var cl : Test : = new Test() ; Writeln(cl.

A) ; / / должно не выполняться но паскалю пофиг Writeln(cl.

B) / / выпонится End.

SonyaSkupnova 6 апр. 2020 г., 22:46:23 | 5 - 9 классы

Объяснить, что будет напечатано программой program e3 ; var a, b : integer ; begin read(a, b) ; writeln(a, b, a) ; end?

Объяснить, что будет напечатано программой program e3 ; var a, b : integer ; begin read(a, b) ; writeln(a, b, a) ; end.

Исходные значения а и b : 2 и 0?

Аовл 16 июл. 2020 г., 16:45:17 | 10 - 11 классы

Чему будет равен результат выполнения программы, если ввести значения для a = 169?

Чему будет равен результат выполнения программы, если ввести значения для a = 169?

Program c22 ; var a : integer ; k : integer ; begin k : = 0 ; readln(a) ; while (a< ; > ; 0) do begin a : = a div 10 ; inc(k) ; end ; writeln(k) ; end.

А) 9 Б) 3 В) 0 Г) 1.

Gameplayermcpe 24 апр. 2020 г., 01:32:12 | 5 - 9 классы

Какое значение примет переменная Х после выполнения программы, если его введенное значение с клавиатуры 121?

Какое значение примет переменная Х после выполнения программы, если его введенное значение с клавиатуры 121?

Program z7 ;

var X : integer ;

begin

writeln('введите Х') ;

if X > ; 100 then X : = X - 20 ;

writeln('X = ', X) ;

end.

2. Какой результат получится после выполнения программы, если a = 5 и b = 2?

Program z8 ;

var a, b, c : integer ;

begin

readln(a, b) ;

c : = sqr(a + b) ;

if c> ; 59 then a : = a + 2

else c : = c + 2 ;

writeln ('результат c = ', c) ;

end.

Nausiaru 18 мар. 2020 г., 23:19:31 | 5 - 9 классы

Program Test ; var A, B , C : integer ; begin readln (A, B) ; C : = (A + B) * (B - A) ; writeln (C) end?

Program Test ; var A, B , C : integer ; begin readln (A, B) ; C : = (A + B) * (B - A) ; writeln (C) end.

Помогите пожалуйста.

Объясните как вы делали.

MadaFler 29 мар. 2020 г., 09:30:43 | 10 - 11 классы

Помогите пожалуйста?

Помогите пожалуйста!

Что выводит на экран следующая программа?

Program P120 ; var i : ^ integer ; begin new (i) ; i ^ : = 1 ; new(i) ; i ^ : = 2 ; new(i) ; i ^ = 3 ; writeln (i ^ ) ; readln ; end.

Lyaschenko 29 мар. 2020 г., 06:07:37 | 5 - 9 классы

Какая задача решается по следующей программе?

Какая задача решается по следующей программе?

Program Test var A, B, C : integer ; begin readln ( A, B) ; C : (A + B) * (B - A) writeln(C) end.

Задача связана с программой паскаль.

Alinochka18 27 февр. 2020 г., 19:51:26 | 5 - 9 классы

Какую задачу решает данная программа ?

Какую задачу решает данная программа .

Что нужно изменить в программе , чтобы она решила задачу нахождения утроенного частного двух чисел .

Program pr3 ; var a, b , c : integer ; begin readln(a, b) ; c : = sqr (a) + sqr (b) ; writeln('c = ' , c) ; end.

14013 10 мая 2020 г., 01:22:45 | 10 - 11 классы

Объяснить, в чем заключается синтаксическая ошибка (или ошибки) в приведенной программе?

Объяснить, в чем заключается синтаксическая ошибка (или ошибки) в приведенной программе.

Написать тот вариант программы, который, по Вашему мнению, будет правильным.

Program My_Error ; Var X, Y, Сумма : Integer ; Begin WriteLn( Введите значение X) ; ReadLn(X) ; WriteLn( Введите значение Y) ; ReadLn(Y) ; Сумма = X + Y ; WriteLn(Сумма) End.

Ksusha1037 25 июн. 2020 г., 21:03:03 | 5 - 9 классы

Здравствуйте, помогите пожалуйста найти ошибку program name ; uses crt ; var a : integer ; begin writeln ('Введите время = ') ; readln (a) ; if (a)then ; begin writeln ('ночь') ; end ; / / / if a = 3 ?

Здравствуйте, помогите пожалуйста найти ошибку program name ; uses crt ; var a : integer ; begin writeln ('Введите время = ') ; readln (a) ; if (a)then ; begin writeln ('ночь') ; end ; / / / if a = 3 then begin writeln ('утро') ; readln (d) ; if a = 12 then begin writeln ('день') ; end ; if a = 16 then begin writeln ('вечер') ; / / / if a = 21 then begin writeln ('ночь') ; / / / end ; end ;