Меню сайта

Поиск

Архив записей
Разработки [1]
Здесь помещены разработки по информатики
Электронный учебник [3]
Электронные учебники по различным разделам информатики
Учебники [0]
Учебники по информатики
Планирование [1]
Методическое планирование
Уроки [2]
Задачи по программированию с решениями [1]

Статистика сайта
Каталог сайтов 'Российское образование в сети' Сайт учителя информатики и физики Зубаковой М.А. Яндекс.Метрика Яндекс цитирования
Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа

Приветствую Вас, Гость · RSS 16.12.2017, 02:20

Главная » Файлы » Информатика » Задачи по программированию с решениями

Среди данных трех чисел a, b, c имеются два одинаковых.
23.03.2012, 20:23
Составить программу, печатающую значение булевской  переменной (true-если выражение является истинным и  и false- в противном случае). Среди данных трех чисел a, b, c имеются два одинаковых.
Решение на Паскале
programm sravnenir;
uses crt;
var
a, b, c: real;
k: boolean;
begin
writeln('Введите a='); Readln(a);
writeln('Введите b='); Readln(b);
writeln('Введите c='); Readln(c);
if a= b then k:=true
else if a= c then k:=true
if b= c then k:=true
else k:=false;
writeln('Значение k=', k); Readln;
end.
Решение на Basic
'prim
DEFINT A-C, K
CLS
INPUT "a=,b=,c="; A, b, C
IF (A = b) OR (A = C) OR (b = C) THEN PRINT " true" ELSE PRINT " false"
END


Категория: Задачи по программированию с решениями | Добавил: Tasmin
Просмотров: 719 | Загрузок: 1 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Зубакова М.А. © 2017