Задать вопрос
22 июля, 17:55

Найдите логически неверную последовательность команд:

1) Writeln (S) ; A:=A*2; readln (A, B) ; S:=A+B;

2) readln (A, B) ; A:=A*2; S:=A+B; Writeln (S) ;

3) readln (A, B) ; S:=A+B; A:=A*2; Writeln (S) ;

4) A:=3; B:=5; A:=A*2; S:=A+B; Writeln (A) ; Writeln (S) ;

+3
Ответы (1)
  1. 22 июля, 20:09
    0
    1) Writeln (S) ; A:=A*2; readln (A, B) ; S:=A+B;

    Обычно сначала осуществляется ввод, затем затем вычисляются значения, затем вывод. Здесь же сначала выводится S, а потом вычисляется. С переменной А тоже ерунда, сначала вычисляется значение, после чего вводится с клавиатуры.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Найдите логически неверную последовательность команд: 1) Writeln (S) ; A:=A*2; readln (A, B) ; S:=A+B; 2) readln (A, B) ; A:=A*2; S:=A+B; ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln (' введи номер месяца ') ; readln (N_M) ; case N_M of 1:writeln (' январь ') ; 2:writeln (' февраль ') ;
Ответы (1)
Запиши программу в Паскале для вычисления площади прямоугольника со сторонами c и m. 1) begin writeln ('Введи длину и ширину прямоугольника c и m') ; readln (c, m) ; s:=c*m; writeln ('s=', s) ; readln; end.
Ответы (1)
Что я неправильно написал? var a, b, c, d: real; begin writeln (' введи число a') ; readln (a) ; writeln ('введи число b') ; readln (b) ; writeln ('введи число c') ; readln (c) ; d:=a; a:=c; writeln (a) ; c:=b; writeln (c) ; b:=d; writeln (b) ; end.
Ответы (1)
Почему программа не работает (Pascal) Program abc; Var A, B: array [1 ... 5] of integer; i:integer; begin For i : = 1 to 5 do begin writeln ('введите A') ; readln (A[i]) ; writeln ('Введите B') ; readln (B[i]) ; writeln (A[1]+B[1]) ;
Ответы (1)
Помогите объяснить задачу! Program String29; var otvet:String; i:integer; S0, S:String; C:char; begin Writeln ('Введите строкy S') ; readln (S) ; Writeln ('Введите строкy S0') ; readln (S0) ; Writeln ('Введите символ C') ; readln (C) ;
Ответы (1)