Задача 10 урок 9
Primary tabs
http://fkn.ktu10.com/?q=node/8539
Есть программа:
var m,s:integer;
begin
writeln('Vvedite chislo M');
readln(m);
s:=1;
if (s = 1) then
writeln('soobchenie 1');
if (s = m) then
writeln('soobchenie 2');
end;
-- при этом известно, что если s равно 1, то на экран должно вывестись только первое сообщение (а второе выводиться не должно), а если s не равно 1, но равно m, то второе (а первое выводиться не должно).
Но сейчас программа работает не так, исправьте это.
program task10_lesson9; program task10_lesson9; var m,s:integer; begin writeln('Vvedite chislo M'); readln(m); s:=1; if (s = 1) then writeln('soobchenie 1') else writeln('soobchenie 2'); end.
- Log in to post comments
- 326 reads