В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
kiss123kiss
kiss123kiss
15.02.2022 00:58 •  Информатика

Призначення функцій Int, Round, Trunc, Frac, якого типу стає результат та наведіть по 1 прикладу до кожної функції​

Показать ответ
Ответ:
070974zZ
070974zZ
17.07.2022 05:49
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var c1:=ReadlnChar('Введите первый символ:');
  var c2:=ReadlnChar('Введите второй символ:');
  Print(c1);
  if c1>c2 then Print('>')
  else
    if c1=c2 then Print('=')
    else print('<');
  Println(c2)
end.

Примеры
Введите первый символ: a
Введите второй символ: b
a < b

Введите первый символ: d
Введите второй символ: d
d = d

Введите первый символ: z
Введите второй символ: m
z > m

Введите первый символ: q
Введите второй символ: Q
q > Q
0,0(0 оценок)
Ответ:
IBRAGIM058
IBRAGIM058
25.11.2020 05:41

#include "stdafx.h"

#include <stdio.h>//i/o

#include <conio.h> //_getch()

#include <ctype.h> //toupper

 

int main()

 

{

   long i,n;

   float cost, p,buf;

   do

   {

       printf("Vvedite pervonachalnuy stoimost : ");scanf_s("%f",&cost);

       printf("Vvedite procent p %  : ");scanf_s("%f",&p);

       printf("Vvedite n chisl Let : ");scanf_s("%u",&n);

       for(i = 0; i < n; i++)

       {

           printf("Let %u\r\n",i + 1);

           buf = cost*p/100;

           printf("Stoimost za zimmu + : %f\r\n",(cost += buf));

           buf = cost*p/100;

           printf("Stoimost za zimmu -: %f\r\n",(cost -= buf));

       }

       printf("Stoimost %u Let %f\r\n",i,cost);

       printf("Najmite Y - new input\r\n");

   }

   while(toupper(_getch()) == 'Y');

   return 0;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота