Nikolaevich_Vladimirovich1509
?>

Найти ошибки и исправить их Program Ex2; Uses CRT; Var Const A, B-integer; Rezult:byte Begin Write('Введите два числа: '); Reat(A, B); Rezult=A * B; Writeln('Отношение равно ' Rezult); End.

Информатика

Ответы

Кириллов57

Код исправленной программы:

Program Ex2;  

Uses CRT;  

Var a, b:integer;  

Rezult:byte;

Begin  

Writeln('Введите два числа: ');  

Readln(A,B);  

Rezult := A * B;  

Writeln('Отношение равно ', Rezult);  

End.

dmitriy
◘Объективность информации. Например: "На улице холодно" - это субъективная информация. А "На улице -14°" - объективная (но не всегда точная)
◘Достоверность информации. Ин-фа достоверна, если отражает истинное положение дел. (объективная информация всегда достоверна)
◘Полнота информации. Информация полная, если ее достаточно для понимания и принятия решения.
◘Точность информации. Определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т.д.
◘Актуальность информации – важность для настоящего времени.
◘Полезность информации.
 - Самая ценная информация – объективная, достоверная, полная, и актуальная.
ftyh6

тк Борисов жил с ученым из Ярославля, то Борисов не оттуда и не с Москвы и Санкт-Петербурга. следовательно, он с Новосибирска

Григорьев не Москвич и не с Ярославля. и теперь понятно, что не с Новосибирска. следовательно, он с Санкт-Петербурга

Егоров не с Москвы, остается один вариант, он с Ярославля

а Викторов значит с Москвы

можно сделать таблицу (по ней легко решать такие задачи):

                  Москва.   Новосиб.   С-п.   Ярославль.

Борисов.       -                 +               -              -

Викторов.     +                -                -              -

Григорьев.   -                 -                +             -

Егоров.         -                 -                -              +

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Найти ошибки и исправить их Program Ex2; Uses CRT; Var Const A, B-integer; Rezult:byte Begin Write('Введите два числа: '); Reat(A, B); Rezult=A * B; Writeln('Отношение равно ' Rezult); End.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Наталья_Васищев
lyukiss
Никита
КузменковаЖигулин
dumpler
stic1995
rstas
office
energycomplect5914
Karpova
Hugokate77729
Rubber-soul
northwest7745
danceplusru
windless-el