profile
Размещено 5 лет назад по предмету Информатика от bablarek

Задания для самостоятельной работы:

1. Имеются два числа.

a) Вычислите сумму и разность этих чисел,
используя два оператора readln.

b) Перепишите программу так, чтобы
использовался один оператор readln.

c) Добавьте комментарии к программе.

2. Имеются три числа. Вычислите их
произведение.

3. По заданным сторонам прямоугольника a и
b вычислите его периметр и площадь.

4. Человеку сегодня исполнилось R лет.
Сколько ему дней? Часов? Минут? Секунд? (Високосные годы не учитывать)

  1. Ответ на вопрос
    Ответ на вопрос дан KGW
    1(a)
    Program Zadanie;
    var a,b,c,d:integer;
    begin
    writeln('введите два числа');
    readln(a,b);
    c:=a+b;
    writeln(c);
    readln;
    d:=a-b;
    writeln(d);
    readln;
    end.

    b)
    Program Zadanie;
    var a,b,c,d:integer;
    begin
    writeln('введите два числа');
    readln(a,b);
    c:=a+b;
    d:=a-b;
    writeln(c,d);
    readln;
    end.

    c)
    Program Zadanie;
    var a,b,c,d:integer; 
    begin
    writeln('введите два числа');  //здесь вводим два числа
    readln(a,b);
    c:=a+b;
    d:=a-b;
    writeln(c,d);
    readln;
    end.

    2.
    Program Zadanie;
    var a,b,c,d:integer; 
    begin
    writeln('введите три числа');  
    readln(a,b,c);
    d:=a*b*c;
    writeln(d);
    readln;
    end.

    3.
    Program Treugol;
    var a,b,c,d:real; 
    begin
    writeln('введите два числа');  
    readln(a,b);
    c:=2*(a+b);
    d:=a*b;
    writeln(c,d);
    readln;
    end.

    4.

    Program Goda;
    var R:real;
    begin
    write('введите R');
    readln(R);
    d:=R*356;
    c:=d*24;
    m:=c*60;
    s:=m*60;
    writeln(d);
    writeln(c);
    writeln(m);
    writeln(s);
    readln;
    end.

    Надеюсь на лучший ответ и на спасибо:)

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.