Artyom
?>

Написать программу чтоб работала в pascal запрашивает с клавиатуры два целых числа, их разность и частное (результат деления) и выводит на экран сообщение о правильности сделанных пользователем вычислений;

Информатика

Ответы

Darya Aleksei1173
Pascalabc var x,y,z: integer; t: real; begin writeln('введите первое целое число'); readln(x); writeln('введите второе целое число'); readln(y); writeln('введите разность'); readln(z); writeln('введите частное'); readln(t); i f ((z=x-y)or (z=y-x)) and((t=x/y)or(t=y/x))  then writeln('вычисления выполнены правильно') else writeln('вычисления выполнены неправильно'); end.
bykovaam
Const   maxn = 100; // максимальное кол-во элементов массива var   n, i: longint;   middle, sum, sum2: real; // может быть нецелым числом   a: array[1..maxn] of real; begin   write('введите количество элементов массива: ');   readln(n);   sum : = 0; // считаем сумму всех элементов, чтобы найти среднее арифметическое   write('введите элементы массива через пробел: ');   for i : = 1 to n do begin       read(a[i]);       sum : = sum + a[i];   end;   middle : = sum / n; // вычисляем среднее арифметическое   writeln('среднее арифметическое = ', middle);   sum2 : = 0; // считаем сумму элеметов, меньших среднего арифметического   for i : = 1 to n do     if a[i] < middle then       sum2 : = sum2 + a[i];   writeln('сумма элементов, меньших среднего арифметического = ', sum2); end.
karnakova-a
Формат. формат шрифта подразумевает под собой: выбор подчеркивания; подбор ширины; определение цвета шрифта; выбор шрифта; подбор начертания; выбор размера; кернинг шрифта; смещение  шрифта; шрифтовые спецэффекты; индексацию.характеристики шрифта: гарнитура, кегль, начертание, ширина, подчеркивание, кернинг, цвет шрифта, смещение символов шрифта, параметры анимации, индексация, регистр шрифта.но если попроще: шрифтов много, отличаются они друг от друга по 3-м параметрам: гарнитура,  размер символов,  начертание.а все остальное - лишь детализация.

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

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

Написать программу чтоб работала в pascal запрашивает с клавиатуры два целых числа, их разность и частное (результат деления) и выводит на экран сообщение о правильности сделанных пользователем вычислений;
Ваше имя (никнейм)*
Email*
Комментарий*

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

svetsalikowa
Artyukhin545
kalina1372
sergeevna
Aleksandr768
kia80
MikhailNechaeva
Konstantinovna1936
morsh9345
Vladimirovna Dmitrieva
dimkimka386
dsnewline
Павел_Перелыгин
Костюм ауыстыру деген не?​
Fedorovich309
Ильдар-Кугай