Простой калькулятор на паскале плз

1 ответ

Посмотреть ответы

DevAdmin

1720

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 uses crt; var r,t:integer; w:char; s:real; begin clrscr; writeln('vvedite operatsiyu'); readln(w); write('vvedite chisla r,t'); readln(r,t); case w of '+':s:=r+t; '-':s:=r+t; '/':s:=r/t; '*':s:=r*t; end; writeln('otvet',s:3:2); readln; end.

может так?

Хороший ответ

4 апреля 2023 23:38

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Помогите решить Напишите функцию  mean(xs) , принимающую список вещественных чисел и возвращающую их среднее арифметическое с точностью до 6... Известны площади круга и квадрата. Определить, уместится ли круг в квадрате. Составить блок-схема... Вопрос: Дискретная форма – это ... Выберите один из 3 вариантов ответа: 1) форма представления, при которой информация преподнесена в виде отдельны... Все 4-буквенные слова, составленные из букв В, И, Р, Т, записаны в алфавитном порядке. Вот начало списка: 1. ВВВВ 2. ВВВИ 3. ВВВР 4. ВВВТ 5. ВВИВ... N =5 A=[0]*N for i in range(N):         A[i]=i+3...