ИНФОРМАТИКА . нужно сделать программу по этому заданию. Паскаль

Дано число. Если оно положительно, то вычесть из него 8, в противном случае прибавить к нему 6. Вывести полученное число

Лучший ответ по мнению автора

Program chislo;
var 
a:real;// Описание переменных
begin
writeln('Введите число ');//Диалоговое окно
readln(a);
if a>=0 then a:=a-8 else a:=a+6 ;// если а>=0 тогда а принимает значение а-8 иначе а принимает значение а+6
writeln('Полученное число a = ',a);//вывод полученного числа
end.
06.04.16
Лучший ответ по мнению автора
Рекомендуем личную консультацию

Глеб Черняк

Сейчас на сайте
Глеб Черняк
Глеб Черняк
Эксперт месяца
☑ Профессиональная помощь в настройке, установке любых программ, драйверов и операционных систем семейства Windows, Mac OS. ☑☑☑ Избавлю от вирусов, баннеров и прочей гадости. ☑ Помогу разобраться с железом. ☑ Видеомонтаж, Фото и видео услуги. ●●● Узнать подробнее
Посмотреть всех экспертов из раздела Технологии > Тестирование